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Allow exception dispatching to take a detour through an 
Testeuatin emulator so that the exception parameters can 
be modified to describe an exception at the site of the 
emulated instruction rather than inside the emulator. 
Correct errors that appeared in comments. 


v03-004 Acedes Andrew C. Goldstein 20-Jan-1984 1:38 
ix FP validation in condition handler search; also 
4. My EXESUN NWIND directly to avoid P1 vectors 


v03-003 wMc0001 Wayne Cardoza 28-0c t-1983 
hange mode to user or supervisor handlers should not get 
control in privileged modes. 
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x a FO to frame of exception 
v03-001 ACG0310 Andrew C. Goldstein, 31-Jan-1983 13:44 
Fix probing of stack after expansion 
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v04=0 es es ras ced a ve 4, 
6 ; HARDWARE EXCEPTION HANDLING 
6 WITTITITIIIIIIIIIILITLII ITLL LILLE L LLL LLL LLL LL Li LETT itil 
87 : FAIR WARNING!! THE EXCEPTION REFLECTION AND CONDITION HANDLING cove ui 
65 ; THIS MODULE CRAWLS WITH ASSUMPTIONS gABour THE FORMAT OF THE STACK 
66 : ARGUM TS, AS DOCUMENTED IN VARIOUS COMMENTS THROUGHOUT. tNCEN 
67 : THE STACK POINTER MOVES FREQUENTLY, NO ATTEMPT HAS BEEN MAD USE 
68 : SYMBOL § FOR STACK RELATIVE REFERENCES. CHANGES 30 STAC 
§ : FORMAT SH MADE ONLY AFTER THOROUGH INSPECTION AND UNDERSTANDING 
0 : OF THE CODE (NOT TO MENTION APPENDIX C OF THE ARCHITECTURE HANDBOOK). 
09 f1 : NOTE ALSO THAT LIBS$SIGNAL MUST TRACK THE STACK FORMATS USED HERE. 
099 rs MITIIIIIIIIIIITTTI IIIT LITT L LLL LLL LLL LLL Li LLL LLL EEE 
38 75 ; MACRO LIBRARY CALLS 
0000 
0000 478 SCHFDEF sDEFINE CONDITION HANDLING ARGLIST OFFSETS 
900 79 SIPLDEF ‘DEFINE INTERRUPT PRIORITY LEVELS 
000 80 SMCHKDEF [DEFINE MACHINE CHECK RECOVERY BITS 
909 81 PCBDEF [DEFINE PCB OFFSETS 
000 é SPHDDEF SDEFINE PHD OFFSETS 
909 PRDEF TDEFINE PROCESSOR REGISTERS 
00 4 SPSLDEF [DEFINE PROCESSOR STATUS FIELDS 
000 & SDEF [DEFINE SYSTEM STATUS VALUES 
0000 86 SSTSDEF :DEFINE STATUS CODE FIELDS 
0000 87 ADEF [DEFINE VIRTUAL ADDRESS FIELDS 
$000 «89 
909 30 : LOCAL SYMBOLS 
909 3 + CALL FRAME OFFSET DEFINITIONS 
00 94 * 
00000000 000 95 HANDLER=0 :CONDITION HANDLER ADDRESS 
999 0004 000 36 SAVPSW=4 SSAVED PSW FROM CALL 
00000 ¢ 0 97 SAVMSK=6 SREGISTER SAVE MASK 
900 0 0 98 SAVAP=8 TSAVED AP REGISTER IMAGE 
09 00 ¢ ° SAVFP=12 :SAVED FP REGISTER IMAGE 
0000001 00 100 SAVPC=16 [SAVED PC REGISTER IMAGE 
00000014 : SAVRG=20 SOTHER SAVED REGISTER IMAGES 
105 ; 
104 : LOCAL DATA 
! 5; 
0000 5 .PSECT YEXEPAGED1,LONG 
0000000 1 3 FINAL_IDX = 0 s INDICES TO FETCH MESSAGE ADDRESSES 
0 1 ) 110 ATTCONSTO IDK = 
; 11 BADHANOL ER 10x + 
0 11 BADAST._1X = 
00 11% MSG_VECTOR: 
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s:ATTEMPT TO CONTINUE FROM STOP MESSAGE 


-ASCIZ /attempt to continue from STOP./ 


;BAD CONDITION HANDLER MESSAGE ADDRESS 


er address or entry mask./ 


ASCIZ /invalid condition handl 
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;BAD AST MESSAGE ADDRESS 
-ASCIZ /invalid AST address or entry mask./ 
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EXCEPTION = EXCEPTION HANDLING 16-SEP-1984 00:06:28 VAX/VMS Macro V04-00 Page 4 
FOee000 ACCESS VIOLATION FAULT moat ran ek Bed a ae ptt ed 
A rs ~SBTTL ACCESS VIOLATION FAULT 
A 1; EXESACVIOLAT = ACCESS VIOLATE FAULT 
Ab ¢ ; THIS ROUTINE IS AUTOMATICALLY VECTORED TO WHEN AN ACCESS VIOLATION IS 
Ag 4: > DETECTED. THE STATE OF THE STACK ON ENTRY IS: 
Oa 1 g: ; O(SP) = ACCESS VIOLATION REASON MASK. 
OA6 137: 4(S$P) = ACCESS VIOLATION VIRTUAL ADDRESS. 
QOAG = 138 : (SP) = EXCEPTION PC. 
Ong 139 ; 12(SP) = EXCEPTION PSL. 
Ong 141 ; ACCESS VIOLATION REASON MASK FORMAT IS: 
OOA6 128 ; BIT 0 = TYPE OF ACCESS VIOLATION. 
0A6 144 | = PTE ACCESS CODE DID NOT PERMIT INTENTED ACCESS. 
00A6 145; 1 = POLR, PILR, OR SOLR LENGTH VIOLATION. 
QOAG 146 ; BIT 1 = PTE REFERENCE. 
DOG 147 : 0 = SPECIFIED VIRTUAL ADDRESS NOT ACCESSIBLE. 
AG 148 ; 1 = ASSOCIATED PAGE TABLE ENTRY NOT ACCESSIBLE. 
Q0A6 = 149 ; BIT 2 = INTENDED ACCESS TYPE. 
QOA6 150 ; 0 = READ. 
OOAG 131 ; 1 = MODIFY. 
00A6 138 } ; THE EXCEPTION NAME FOLLOWED BY THE NUMBER OF EXCEPTION ARGUMENTS ARE 
Bpae 130: 3; PUSHED ON THE STACK. FINAL PROCESSING IS ACCOMPLISHED IN COMMON CODE. 
00A6 156 
00000000 157 .PSECT SAE XENONPAGED, LONG 
0000 «158 -ALIGN LONG 
0000 159 EXESACVIOLAT:: ACCESS VIOLATION FAULTS 
03 OC AE O02 18 ED 0000 160 CMPZV #PSLS$V_CURMOD,#PSL$S_ CURMOD., 12(SP) ,APSL$C_USER ; CHECK FOR USER 
17. 12 0006 161 BNEQ 208 7NO, REALLY AN ACCESS VIOLAT 
OF 88 9008 168 PUSHR #*M<RO.R1.R2 R33 TSAVE WORKING REGISTERS 
52 14 AE D0 OO0A 16 MOVL  <4+<4ed>>(SP5 R [GET BASE ADDRESS FOR EXTEND 
QOO0041A'EF 16 O00E 164 JSB EXESEXPANDSTK ‘EXPAND STACK 
06 50 £9 0014 165 BLBC = RO, 10$ :BR IF CANT EXTEND 
OF BA 0017 166 POPR #*M<RO,R1,R2,R3> TRESTORE REGISTERS 
5E 08 CO 0019 167 5$: ADDL  #8,SP CLEA N EXCEPTION PARAMETERS FROM STACK 
02 001C 168 REI AND RETURN TO RETRY INSTRUCTION 
OF BA 001D 169 10$: POPR #*M<RO,R1,R2,R3> ? RESTORE REGISTERS 
Solr vt ce 
OO1F 1% : THE FOLLOWING SECTION of cope 1S USED TO MASK A SPURIOUS ACCESS VIOLATION 
1f 173 : WHICH IS SEEN ON THE 780/ AT THIS TIME THE EXACT CAUSE IS UNKNOWN. IT IS 
OO1F 17% : ASSUMED 18 BE EITHER HARDWARE OR MICROCODE. 
O1F 176 ; THE SPURIOUS ACCVIO ONLY OCCURS WHEN AN INSTRUCTION STARTS ON THE LAST BYTE 
O1F 177: PAGE. THE EXACT CIRCUMSTANCES ARE UNKNOWN SINCE IT CANNOT BE RELIABLY 
IF 178 : OE PRODUCED. 
04 AE O1FF ef 8 1F 180 BITW #*X1FF,4(SP) ; WAS FIRST BYTE OF PAGE REFERENCED 
ee 5 181 BNEQ ACVIOLAT : 
D ae é TSTL = (SP) : WAS IT READ ACCESS 
if 9 1 BNEQ ACVIOLAT > NO 
7E O4 AE OB AE C B 184 SUBL3 8(SP),4(SP),-(SP) : GET DIFFERENCE BETWEEN PC, REFERENCE 
01 BE D1 1 185 CMPL 6s (SP) +, #1 + ARE THEY ADJACENT 
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#0,#1,84(SP) 


ACVIOLAT 
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EIESSLBADALY C 
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EX 
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(fia Is IT SPURIOUS 

EXESGL ABSTIM,EXESGL_BADACY T ; ARE THEY COMING FAST 

,EXESGL_BADACV SAVE TIME OF THIS ONE 
ye THEM 


$_ACCVi0,-(SP) tSET EXCEPTION NAME 


gf 
EXCEPTION - EXCEPTION HANDLING 16-SEP-1984 AX/VMS Macro V04-00 P 
Fee 000 ARITHMETIC TRAPS -SEP-1984 Z 83: 96: 8 SYS.SR i? XCEPTION.MAR; 1 eat (&) 
9 4 .SBTTL ARITHMETIC TRAPS 
: : ; EXESARITH = ARITHMETIC TRAPS 
9 : THIS ROUTINE IS AUTOMATICALLY VECTORED TO WHEN AN ARITHMETIC TRAP IS 
3 09 DETECTED AT THE END OF AN INSTRUCTION. THE STATE OF THE STACK ON ENTRY 
069 211: 
69 13 ; O(SP) = ARITHMETIC EXCEPTION CODE. 
69 213: 4(SP) = EXCEPTION PC. 
69 1 : &(SP) = EXCEPTION PSL. 
O88 1 : POSSIBLE ARITHMETIC EXCEPTION CODES ARE 
069 18: 0 = UNDEFINED. 
0069 219: 1 = INTERGER OVERFLOW. 
0069 0: : = INTEGER DIVIDE BY ZERO. 
0069 1: = FLOATING OVERFLOW. 
069 : : 4 = FLOATING OR DECIMAL DIVIDE BY ZERO. 
0069 : 5 = FLOATING UNDERFLOW. 
0069 4: $ = DECIMAL STRING OVERFLOW. 
0069 5: = SUBSCRIPT RANGE TRAP IN INDEX INSTRUCTION. 
0069 g ; 8 = FLOATING OVERFL UL 
0069 : 9 = FLOATING DIVID £ BY ZERO FAULT. 
0068 g ; 10 = FLOATING UNDERFLOW FAULT. 
0069 0 : THE EXCEPTION NAME FOLLOWED BY THE NUMBER OF EXCEPTION ARGUMENTS ARE 
0069 1 : PUSHED ON THE STACK. FINAL PROCESSING IS ACCOMPLISHED IN COMMON CODE. 
0069 38 ; 
0069 4 .ALIGN LONG 
006C 235 EXESARITH:: yARITHMETIC TRAPS 
08 C4 006C 236 MULL #8, (SP) *CALCULATE EXCEPTION NAME OFFSET 
6E 0474 BF AO O06F 7 ADDW  #SS$_ARTRES, (SP) SCALCULATE ACTUAL EXCEPTION NAME 
0104 31 0074 8 BRW EX3ARG : 
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v04-0 AST DELIVERY STACK FAULT -SEP=1 138 88: 06: 78 EOYs. SRCIE CEPTION.MAR: 1 wegen VvOé 
th 49 = .SBTTL AST DELIVERY STACK FAULT 
A 4g i > EXESASTFLT = AST DELIVERY STACK FAULT 
77 bbe THIS ROUTINE 1S ENTERED VIA A JMP FROM THE AST DELIVERY MODULE 
77 ©6945 ; WHEN AN INVALID STACK IS DETECTED WHILE ATTEMPTING TO DELIVER 
aA 4g > AST, Ate STATE OF THE STACK ON ENTRY IS 
77 ‘8 : O(SP) = SP VALUE AT PAULT CUNMOD IF LE BY AST DELIVERY). 
77 249: 4(SP) = AST PARAMETER OF FAILED AST. 
77 0 ; (SP) = PC AT AST DELIVERY INTERRUPT. 
77 ; 12(SP) = PSL AT AST DELIVERY INTERRU 
77 é ; 16(SP) = PC TO WHICH AST WOULD HAVE BEEN DELIVERED. 
ppee 7 3 20(SP) = PSL AT WHICH AST WOULD HAVE BEEN DELIVERED. 
977 55 : THE EXCEPTION NAME FOLLOWED BY THE NUMBER OF ARGUMENTS ARE PUSHED 
oF 26 : ON THE STACK. FINAL PROCESSING IS ACCOMPLISHED IN COMMON CODE. 
0077 38 : NOTE THAT THE PREVIOUS MODE FIELD IN THE PSL IS KERNEL MODE IN THIS 
077 259 : ENTRY POINT, SINCE AST'S (AND AST FAULTS) RESULT FROM INTERRUPTS, AS 
0077 260 : OPPOSED TO ALL OTHER EXCEPTIONS WHICH RESULT FROM FAULTS OR TRAPS. 
0077 261 ; SINCE THE EXCEPTION MAIN BODY EXPECTS PREVIOUS MODE TO BE THE MODE 
0077 6¢ ; IN WHICH THE EXCEPTION OCCURRED, AND THE MODE TO WHICH [T WILL BE 
0077 263 ; REPORTED, WE MUST FIX IT UP ACCORDINGLY. 
borr Seg 
0077 266 EXESASTFLT:: ;AST DELIVERY STACK FAULT 
7E 0460C 8F 3C 0077 267 MOVZWL #SS$_ASTFLT,-(SP) i PUSH EXCEPTION CODE 
7 DD OO7C 268 PUSHL #7 COUNT OF ARGUMENTS 
7E 1C AE FFSFFFFF 8F CB O07E 69 BICL3 #*C<PSLSM_PRVMOD>,28(SP). ri : CONSTRUCT PROPER pst 
O18F'CF SF 008 70 PUSHAB W*EXESEXCEPTION SAND EXCEPTION ENTRY POIN 
02 0088 271 REI 'SET PSL AND ENTER COMMON. EXCEPTION CODE 
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v04 BREAKPOINT FAULT aes 7 99:06:28 SYS. SRCJEXCEPTION.MAR; 1 . (&) 04 
¢ f : .SBTTL BREAKPOINT FAULT 
( é t EXESBREAK = SREAKPOINT FAULT 
¢ 5 : THIS ROUTINE IS AUTOMATICALLY VECTORED TO WHEN A BREAKPOINT 
: 4 ; INSTRUCTION IS EXECUTED. THE STATE OF THE STACK ON ENTRY IS: 
¢ 0; 0 (SP) = EXCEPTION PC. 
¢ ; (SP) = EXCEPTION PSL. 
¢ ; + THE EXCEPTION NAME FOLLOWED BY THE NUMBER OF EXCEPTION ARGUMENTS ARE 
¢ 4 > PUSHED ON THE STACK. FINAL PROCESSING IS ACCOMPLISHED IN COMMON CODE. 
7S 
¢ 5 .ALIGN LONG 
C 8 EXESBREAK:: ;BREAKPOINT FAULT 
7E 0414 8F 3 ¢ MOVZWL sss BREAK, -(SP) TSET EXCEPTION NAME 
00E7 31 0091 290 BRW EX3ARG ; 


= EXCEPT! 


EXCEPT 
v04- 


H 
CHANGE MODE TO VISOR TRAP 
94 .SBTTL 
é $8 
4 4 ; 
3, (588 
94 3) : VISOR INSTRU 
94 3 5 O(SP) 
94 0; 4(SP) 
Re 1 8(SP) 
94 § s If rie PROCE 
94 4 ; EXCEPTION IS 
94 5 ; NAME FOLLOWE 
94 § 3; FINAL PROCES 
b3¢ahR 
092309 ALIGN 
94 10 EXESCMODSUPR: : 
7E 041C 8F 3c 94 11 MOV 7WL 
02 18 ED 0098 31g 
02 OCA 9¢ 31 
08 19 O009F 31% BLSS 
00000000'9F pd OOAl 315 PUSHL 
16 11 OA7 16 BRB 
0008 31 OOA9 317 208: ~—-BRW 


AX/VMS Macro Vv04-00 Page 9 
SYS.SRCJE EXCEPTION ON.MAR;1 (6) 


"SSEp=19be OS:at 68 


CHANGE MODE TO SUPERVISOR TRAP 


EXESCMODSUPR = CHANGE MODE TO SUPERVISOR TRAP 


; THIS ROUTINE IS AUTOMATICALLY VECTORED TO WHEN A CHANGE MODE TO SUPER- 
; CTION IS EXECUTED. THE STATE OF THE STACK ON ENTRY IS: 


CHANGE MODE CODE. 

EXCEPTION PC. 

EXCEPTION PSL. 

HAS DECLARED A CHANGE MODE TO SUPERVISOR HANDLER, THEN THE 
IRECTLY VECTORED TO THE SPECIFIED HANDLER. ELSE THE EXCEPTION 
BY THE NUMBER OF EXCEPTION ARGUMENTS ARE PUSHED ON THE STACK. 
NG IS ACCOMPLISHED IN COMMON CODE. 

LONG 

: CHANGE MODE TO SUPERVISOR TRAP 
#SS$_CMODSUPR,-(SP) SET EXCEPTION NAME 
#PSLSV_CURMOD.#PSL$S _CURMOD ,- 
13(SP) -#PSLSC_SUPER WERE WE IN USER OR SUPER MODE 
20$ : = DON'T GIVE CONTROL TO HANDLER 
aC TLSGL_ CMSUPR [GET CONTENTS OF CHANGE MODE VECTOR 
EXSSXT : 


<< 
«| 


=, 
EXCEPTION = EXCEPTION HAND 16-$ 4 AX/VMS M4 v04-00 P 1 
vi CHANGE MODE TO USER TRAP Rr SECA IFRS BO:2G: 28 FENLVES acre VOR OO ks Page 19, 
aC = .SBTTL CHANGE MODE TO USER TRAP 
at : EXESCMODUSER = CHANGE MODE TO USER TRAP 
AC + THIS ROUTINE 1s AUTOMATICALLY VECTORED TO WHEN A CHANGE MODE TO USER 
at 4 ; INSTRUCTION IS EXECUTED. THE STATE OF THE STACK ON ENTRY IS: 
AC $ ; O(SP) = CHANGE MODE CODE. 
AC : 4(SP) = EXCEPTION PC. 
at 3 ; 8(SP) = EXCEPTION PSL. 
AC : ; IF THE PROCESS HAS DECLARED A CHANGE MODE TO USER HANLDER, THEN THE EXCEPTION 
AC : IS VECTORED DIRECTLY TO THE SPECIFIED HANDLER. ELSE THE EXCEPTION NAME FOLLOWED 
AC 5 : BY THE NUMBER OF ARGUMENTS ARE PUSHED ON THE STACK. FINAL PROCESSING IS ACCOM- 
AC + PLISHED IN COMMON CODE. 
OAC 4 : IF THIS CODE IS ENTERED IN OTHER THAN USER MODE, IT IS TREATED AS THOUGH NO 
OAC 5 : USER HANDLER WERE DELARED. 
Sac 833 
OAC : .ALIGN LONG 
OAC “ENABL LSB 
OAC 340 EXESCMODUSER:: : CHANGE MODE TO USER TRAP 
7E 0426 8F 3C OOAC 341 MOVZWL #SS$_CMODUSER,-(SP) SET EXCEPTION NAME 
18 ED 00B1 4@ #PSLSV_CURMOD, APSLSS. CURMOD ,- 
03 OC AE 0B4 34 12(SP) 7#PSL$C_USER WERE WE IN USER MODE 
OF 12 00B7 344 BNEQ 'NO = DON'T GIVE CONTROL TO HANDLER 
00000000' 9F pp 0B9 345 PUSHL @#CTLSGL_CMUSER iGET CONTENTS OF CHANGE MODE VECTOR 
04 13 OOBF 46 EXCCMD: BEQL 10% SIF EQL NO DISPATCHER SPECIFIED 
6E BED) at 4? POPL (SP) ; REMOVE EXCEPTION NAME FROM STACK 
SE 04 c0 C5 349 10$: ADDL #4,SP t CLEAN STACK 
oopc = 31 00¢8 50 20$:  BRW EXSSXT ; 
cB = 351 .DSABL LSB 
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we «SBTTL COMPATIBILITY MODE FAULTS 


; EXESCOMPAT - COMPATIBILITY MODE FAULT 


THIS pout is IS AUTOMATICALLY yectonee TO_ WHEN A COMPATIBILITY MODE 
; EXCEP TION IS DETECTED. THE STATE OF THE STACK ON ENTRY IS: 


= paneer ieiery EXCEPTION CODE. 
= EXCEPTION PC. 
= EXCEPTION PSL. 


——~ Ww 


; ; POSSIBLE COMPATIBILITY EXCEPTION CODES ARE: 


SSNS NSS SPP AA AA AAAA MATT 


y 
cB 
(B 
CB 
(8 
(B 
(8 
CB 
CB 
(B 
CB 
(B 
(B : = RESERVED. INSTRUCTION EXECUTION. 
(B = BPT INSTRUCTION EXECUTION. 
CB ; = 107 INSTRUCTION EXECUTION. 
(B = EMT INSTRUCTION EXECUTION. 
CB 4 = TRAP INSTRUCTION EXECUTION. 
¢B 5 = ILLEGAL INSTRUCTION EXECUTION. 
CB ‘ = ODD ADDRESS FAULT. 
cB = TBIT TRAP. 
(B : THE EXCEPTION NAME FOLLOWED BY THE NUMBER OF EXCEPTION ARGUMENTS ARE 
cB j PUSHED ON THE STACK. FINAL PROCESSING IS ACCOMPLISHED IN COMMON CODE. 
CB , 
CB .ALIGN LONG 
OCC $0 EXESCOMPAT:: : COMPATIBILITY MODE FAULTS 
00' 9F e 7D cc 1 MOV RO, @#CTLSAL_CMCNTX SAV Ri IN COMPATIBILITY CONTEXT REGION 
$8 00009008" — 00D : MOVAL aé#CTLSAL_CMCNTX+8,RO :GET TADDAESS OF COMPATIBILITY CONTEXT AREA 
D OODA MOVQ R2,(RO)+ AVE 
7D O0DD 4 mova Ra, (RO)+ SAVE Re: R5 
4 00 EO 5 MOVL 6; (RO)+ 
E D E 6 MOVL Reais (RO)+ «SAVE EXCEPTION CODE AND REMOVE FROM STACK 
— 7D Eg MOVG (SP)+,(RO) AV AND PSL AND REMOVE FROM STACK 
03c00000 8F DD O0E 8 PUSHL #<PSL$C Usenapsi sv _PRVMOD>!<PSL $C USERAPSL SV CURMOD> ; FABRICATE PSL 
00000000'9F oD EF 8 PUSHL  @#CTL$GC_CMHANDLR COMPAT IBTLITY MODE AANDLER ADDRESS 
01 1 FS 0 BEQL 208 BRA NCH iF NONE mp FIED 
0 f 7 REI :JUMP TO COMPATIBILITY HANDLER 
F 93 ; 
F 94 ; NO COMPATIBILITY MODE HANDLER WAS DECLARED. RESTORE THE STACK AND 
F 95 ; SAVED REGISTER, AND CONTINUE THROUGH NORMAL EXCEPTION CODE. RO NOW 
F 96 : : POINTS TO THE SAVED PC IN THE COMPATIBILITY CONTEXT AREA. 
F 
6E ¢ 7D OOF 38 208 208 mova (RO), (SP) ;RESTORE EXCEPTION PC AND PSL 
DD OOFB 400 PUSHL (ROS [PUSH EXCEPTION CODE AGAIN 
50 54 A 0 OOFD rh MOVL =28(R0),RO SRESTORE RO FROM TOP OF CONTEXT AREA 
7E 042C BF 3C 0101 4 MOVZWL #SS$_COMPAT,-(SP) [SET EXCEPTION NAME 
4 OD 01 403 EX4ARG: PUSHL #4 [SET NUMBER OF SIGNAL ARGUMENTS 
0084 31 01 404 BRW EXESEXCEPTION [FINISH IN COMMON COD 


— 


kK 7 
vet KERNEL STACK NOT VALID FAULT "SSEp= 198s BBi2F2E ESNSUSRCHENCEPHTOncman:1 © "89 18) v0 


3 4 ‘ F .SBTTL KERNEL STACK NOT VALID FAULT 

4 : EXESKERSTKNV = KERNEL STACK NOT VALID FAULT 

1 410 : THIS R TINE : AUTOMATICAL Y VECTORED TO WHEN A KERNEL STACK NOT 
1 411: VAL D ! ETE ED DURING A ANGE MO DE INSTRUCTION, DURING AN REI 
1 412 : INSTRU CTION, | ING AN ATTEMP TO PUSH EXCEPTION INFORMATION ON 
1 413 : THE KER K. burAnS EXCEPTION THE INTERRUPT STACK. THE 
41g : STATE ore a Stack ON ENTPY IS: 

1 416 : O(SP) = EXCEPTION P:. 

41 : 4(SP) = EXCEPTION PSL. 

419 > A FATAL KERNEL STACK NOT VALID BUGCHECK IS DECLARED. 

1 5* 

1 i ALIGN LONG 

10C 423 EXESKERSTK ;KERNEL STACK NOT VALID FAULT 
10C 426 BUG. CHECK KRNLSTAKNV, FATAL SKERNEL STACK NOT VALID 


< 


PEELE LLP EEE EEE EEE OF 


BBE LEE EWI ennornrnn) sce 


NOME WO OONO UE OOOO mz 


-z 
ma 


Se, 
16-SEP-1984 AX/VMS_M 
MACHINE CHECK 'ScSEP=19B4 OSiatsa8 eySu sacle 
~SBTTL SIGNAL UNRECOVERABLE MACHINE CHECK 
EXESMCHECK = SIGNAL UNRECOVERABLE MACHINE CHECK 


THE ERROR a. TO pireee wit OR SUPERVISOR 


CHECK OCCU ei IN Hi RNEL 
AND _IN NSTEAD '- MACHINE sete HANDLER BUGCHECKS. 
STATE OF THE STACK ON ENTRY IS: 

O(SP) = EXCEPTION PC 

4(SP) = EXCEPTION PSL 


POSSIBLE CODES ARE: 


Sete Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Se 
ia 


NO ALIGNMENT IS NECESSARY HERE, REI GETS US HERE 


EXESMCHECK:: 
MOVZ2WL #SS$_MCHECK,-(SP) :SE 
BRB EX3ARG FI 


on 
o 
2 


ys ROUTINE IS ENTERED FROM THE MACHINE CHECK pa en ee SIGNAL 
MODE CONTROL DOES NOT COME HERE 


m7 
EXCEPTION = EXCEPTION HANDLING 19-SEP=1 AX/VMS Macro V04-00 Page 14 EX 
vi OPCODE RESERVED 0 CUSTOMER FAULT g-S6F 138 88 96: 8 SYS. SRCJEXCEPTION.MAR; 1 aD v0. 
1 ‘38 : .SBTTL OPCODE RESERVED TO CUSTOMER FAULT 
i 4 ; EXESOPCCUS = OPCODE RESERVED TO CUSTOMER FAULT 
17 4 6 : THIS ROUTINE IS AUTOMATICALLY VECTORED TO WHEN AN OPCODE THAT IS RESERVED 
1 4 4 ; TO CUSTOMERS IS EXECUTED. THE STATE OF THE STACK ON ENTRY IS: 
17. 4 6 : 00(SP) = EXCEPTION PC. 
1 4 ; 4(SP) = EXCEPTION PSL. 
17 § : THE EXCEPTION NAME FOLLOWED BY THE NUMBER OF EXCEPTION ARGUMENTS ARE 
112 460 ; PUSHED ON THE STACK. FINAL PROCESSING IS ACCOMPLISHED IN COMMON CODE. 
rt 
117 188 .ALIGN LONG 
118 464 EXESOPCCUS:: sOPCODE RESERVED TO CUSTOMERS FAULT 
7E 0634 BF 3C 0118 465 MOVZWL sss OPCCUS,-(SP) [SET EXCEPTION NAME 
SC 617 «(011D Ss 466 RB EX3ARG : 


nN 7 
EXCEPTION - EXCEPTION HANDLING 16-SEP-1984 AX/VMS Macro V04-00 Page 15 EXx( 
v04= OPCODE RESERVED TO DIGITAL FAULT g- Ser 7 88: 96: ri SYS.SR ci? XCEPTION. MAR; 1 9 42) vOé 
11 is ; .SBTTL OPCODE RESERVED TO DIGITAL FAULT 
Vt 4f ; EXESOPCDEC = OPCODE RESERVED TO DIGITAL FAULT 
11F 406 ; THIS ROUTINE IS AUTOMATICALLY VECTORED TO WHEN AN OPCODE THAT IS RESERVED 
Ve ih : TO DIGITAL IS EXECUTED. THE STATE OF THE STACK ON ENTRY IS: 
11F 475: 00(SP) = EXECPTION PC. 
iF 476 ; 4(SP) = EXCEPTION PSL. 
11F $78 3; THE EXCEPTION NAME FOLLOWED BY THE NUMBER OF EXCEPTION ARGUMENTS ARE 
Vit rt 4 ; PUSHED ON THE STACK. FINAL PROCESSING IS ACCOMPLISHED IN COMMON CODE. 
11F = 481 
11F 4 : sALIGN LONG 
1 483 EXESOPCDEC:: SOPCODE RESERVED TO DIGITAL FAULT 
00 BE FF 8F 91 1 484 CM Pe #*XFF,a(SP) ;POSSIBLY A BUG CHECK? 
07 +13 «O01 485 BEQ SIF EQL YES 
7E 0463C BF 3C O01 4 6 10S: MOV IWL #SS$_OPCDEC,-(SP) :SET EXCEPTION NAME 
4D 11 Olec 4 BRB EX3ARG ; 
6E OD 4 488 20$: PUSHL (SP) : COPY ADDRESS OF INSTRUCTION 
6E D6 1 489 INCL (SP) ;CALCULATE ADDRESS OF NEXT BYTE 
1 490 IFNORD #1,a(SP),40$ SCAN NEXT BYTE BE READ? 
00 BE FE 8F 91 0139 491 CMPB OM *KFE,a(SP) ;BUGCH ECK WORD? 
08 13 01 : 49¢ BEQL 30% QL YES 
96 FD BF 91 14 49 CMPB Os WXFD,@(SP)+ ; BUGCHE CK LONG? 
E1 te 144 49% BNEQ 10% NEG NO 
7E D 0146 495 TSTL -(SP) t ADJUST STACK POINTER 
4) B3 0148 496 308: TSTL (SP)+ ;REMOVE INSTRUCTION ADDRESS FROM STACK 
FEB3' 31 014A 497 BRW EXE$BUG_CHECK ; 
00 BO 014D 498 40$: PUSHL #0 sSET REASON FOR ACCESS VIOLATION 
FEAE 1 O14F 499 BRW EXESACVIOLAT ; 
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«SBTTL PAGE READ FAULT 
EXESPAGRDERR = PAGE READ FAULT 


THIS ROUTINE IS ENTERED VIA A JUMP FROM THE TRANSLATION NOT VALID 
EXCEPTION ROUTINE WHEN A READ ERROR OCCURS IN TRYING TO MAKE THE 
DESIRED PAGE VALID. THE STATE OF THE STACK ON ENTRY IS: 


TRANSLATION NOT VALID REASON MASK. 
TRANSLATION NOT VALID VIRTUAL ADDRESS. 
EXCEPTION PC 


B 8 

EXCEPTION ON HANDLING 16-SEP-1984 00:06: AX/VMS Macro V04-00 Page 1 EX 

v04= FA gree 1382 99:06:28 EOYs SRCJEXCEPTION MAR; 1 ” df) | 
: EXCEPTION PSL. 


vuvuvovU 
wueww 
Hunn 


; TRANSLATION NOT VALID REASON MASK FORMAT IS: 


BIT 0 = 0 (USED ONLY FOR ACCESS VIOLATION). 
BIT 1 = PTE REFERENCE. 
Q = SPEC VIRTUAL ADDRESS NOT VALID. 


1 = ASS 
BIT 2 = INTEND 


IFIED VI 
OCIATED PAGE TABLE ENTRY NOT VALID. 
ED ACCESS TYP 

Q = READ 
DI 
L 


THE EXCEPTION NAME FO 


ION ARGUMENTS ARE 
; PUSHED ON THE STACK. FINAL PROCESSING IS ACCOMPLISHED 


IN COMMON CODE. 


AIWNROPOPNOMNOPONNONY 2 2 2 SS SS I DQOOOOOCOOO FS 
SOON AOUEWN —DQODNOUSWNODDNOUSWNS «42 


QLVPVDV PV IVLVSUPUSUSVS US USSU ESTOS =o 


EXESPAGRDERR: : ;PAGE READ ERROR 
7E 0444 BF 5 MOVZWL #SS$_PAGRDERR,-(SP) ;SET EXCEPTION NAME 
DD EXSARG: PUSHL #5 ;SET NUMBER OF SIGNAL ARGUMENTS 
0033 351 BRW EXESEXCEPTION FINISH IN COMMON CODE 


| 


———— ee 


¢ 8 
ING 16-SEP=1 AX/VMS_M v04-00 Pa 17 
NG MODE FAULT “SEP=1 1982 83: 24: £8 tSys. SRCIE CEPT ION.MAR; 1 om (14) 
-SBTTL RESERVED ADDRESSING MODE FAULT 
:” EXESRADRMOD - RESERVED ADDRESSING MODE FAULT 


THIS ROUTINE IS AUTOMATICALLY VECTORED TO WHEN AN ATTEMPT TO USE A 
1 enbes ADDRESSING MODE IS DETECTED. THE STATE OF THE STACK ON ENTRY 


EXCEPTION 
v04-0 


_ 
ro 
oz 


DUPVDPVSVSVSTSTSISISISISISIIUIVIIUIUIVIV «=—_ oO 


AWOL E oP or ee et ee et et et et Pe nh hh ah a ao 


—OOODNAMNE WN" OOONOUISW YS 


C 
C 
¢ 
C 
C 
C 
: S: 
C seheg = EXCEPTION PC. 
é 4(SP) = EXCEPTION PSL. 
C THE EXCEPTION NAME FOLLOWED BY THE NUMBER OF EXCEPTION ARGUMENTS ARE 
: 3 PUSHED ON THE STACK. FINAL PROCESSING IS ACCOMPLISHED IN COMMON CODE. 
C 
C +ALIGN LONG 
C EXESRADRMOD: : RESERVED fite alae MODE FAULT 
7E 044C BF 3C C MOVZWL #SS$_RADRMOD,-(SP) SET EXCEPTION NAME 
18 «11 1 BRB EX3ARG ; 


EX 


Dd 8 
EXCEPTION EXCEPTION HANDLING 16-SEP-1984 :06:2 AX/VMS Macro Vv04-00 Pa 1 
FOee000 SERVED OPERAND FAULT mie 7 80:00:28 LEYS SRCIEXCEPTION. MAR; 1 » (8, 
16 ; ie .SBTTL RESERVED OPERAND FAULT 
18 5 ; EXESROPRAND = RESERVED OPERAND FAULT 
16 : THIS ROUTINE IS AUTOMATICALLY VECTORED TO WHEN AN ATTEMPT TO USE A 
i g : RESERVED OPERAND IS DETECTED. THE STATE OF THE STACK ON ENTRY IS: 
1 60: g0<sP) = EXCEPTION PC. 
16 61 4(SP) = EXCEPTION PSL. 
16 : : THE EXCEPTION NAME FOLLOWED BY THE NUMBER OF EXCEPTION ARGUMENTS ARE 
1 ¢ 3; PUSHED ON THE STACK. FINAL PROCESSING IS ACCOMPLISHED IN COMMON CODE. 
16 66 : 
16 6 -ALIGN LONG 
O1¢4 68 EXESROPRAND: : ;RESERVED OPERAND FAULT 
7E 04546 BF 3C 0164 269 MOVZWL #SS$_ROPRAND,-(SP) :SET EXCEPTION NAME 
10 11 0169 570 BRB EX3ARG : 
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EXCEPTION ON HANDLING Shy Ig- SEP-1984 00: 06:28 VAX/VMS v04-00 Page 19 EX 


ING TRAP -SEP=1 SYS.SR cle CEPT 10N.MAR; 1 (16) va 
2 .SBTTL TBIT PENDING TRAP 
oh : EXESTBIT = TBIT PENDING TRAP 
£6 + THIS ROUTINE IS AUTOMATICALLY VECTORED TO WHEN A TBIT PENDING EXCEPTION 
f : IS DETECTED AT THE END OF AN INSTRUCTION. THE STATE OF THE STACK ON ENTRY 
79 : 
0; 00(sP) = EXCEPTION PC. 
1: 4(SP) = EXCEPTION PSL. 
: : IF THE TRAP OCCURED FROM COMPATIBILITY MODE, THEN THE CODE FOR COMPATIBILITY 
4 : MODE TBIT TRAP (7) IS PUSHED ON THE STACK AN EXIT IS MADE 
5 : THE COMPATIBILITY MODE EXCEPTION ROUTINE. ELSE THE TBIT EXCEPTION NAME 
3 + FOLLOWED BY THE NUMBER OF EXCEPTION ARGUMENTS ARE PUSHED ON THE STACK. 
fi FINAL PROCESSING IS ACCOMPLISHED IN COMMON CODE. 
589 ° 
290 .ALIGN LONG 
91 EXESTBIT:: ;TBIT PENDING TRAP 
298 PUSHL #7 SASSUME TRAP FROM COMPATIBILITY MODE 
59 BC #PSL$V_CM,8(SP),10$ LIF CLEAR NOT FROM COMPATIBILITY MODE 
294 BRW EX XESC [IF SET, éo" *0 0 COMPATIBILITY MODE CODE 
95 10$: ADDW WSS. TBIT-7, (SP) SADJUST NAME TO THAT FOR TBIT 
596 EX3ARG: PUSHL :SET NUMBER OF SIGNAL ARGUMENTS 
597 BRW EXESEXCEPTION ; 


EXCEPTION 
v04= 


7E 


04 
000000A6' EF 


50 
O45C 8F 
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DO 
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ANDLING 16-SEP=1 AX/VMS o V04-00 P 
ICE FAILURE EXCEPTION S-gEp=| oH 88: of: £3 EoYS SR SR che CEPTION.MAR; 1 ng 49) 
* -SBTTL SYSTEM SERVICE FAILURE EXCEPTION 
; EXESSSFAIL = SYSTEM SERVICE FAILURE EXCEPTION 
Me! b ROUTINE IS JUMPED TO FROM averee SERVICE CHANGE MODE DISPATCHER 
WHEN THE RETURN STATUS FROM A SYSTEM SERVICE INDICATES FAILURE, THE 
PREVIOUS MODE WAS USER, AND THE CURRENT PROCESS IS ENABLED FOR SYSTEM 
SERVICE FAILURE EXCEPTIONS. THE STATE OF THE STACK ON ENTRY IS: 


) = CHANGE MODE PC. 


F 
thes 
4(SP) = CHANGE MODE PSL. 


RO = FINAL SYSTEM SERVICE STATUS. 


EXESSSFAIL:: - 
MOVZWL #SS$_SSFAIL,-(SP) 


4k We SERVICE FAILURE EXCEPTION 
PUSH REASON FOR SERVICE FAILURE 
{SET EXCEPTION NAME 


; THE FOLLOWING EXCEPTIONS CONVERGE TO THIS POINT: 


: CHANGE MODE TO SUPERVISOR, 
: CHANGE MODE TO USER, AND 
: SYSTEM SERVICE FAILURE. 


EXSSXT: PUSHL 


JMP 


NAL ARGUMENTS 
TO PREVIOUS MODE 


PAAAAAAAAAAOAAOAOOOASOOOOOOOOOOM OFT 
DWONAOUNE WN OC OONOU EWN O ODNOULS WN OO 


za 


9% 
EXESREFLECT 


EXCEPTION = EXCEPTION HANDLING -1984 00:06: AX/VMS Macro v04-00 Page 21 EX 
v0G-= REFLECT EXCEPTION FROM MODE OTHER THAN K "er ety 99:06:28 YeyS. SRCJEXCEPTION.MAR; 1 ° (iB) vo 
F dis .SBTTL REFLECT EXCEPTION FROM MODE OTHER THAN KERNEL 
F ; EXESREFLECT = REFLECT EXCEPTION FROM MODE OTHER THAN KERNEL 
18F é 2% THIS ROUTINE Is JUMPED TO REFLECT AN EXCEPTION. FROM A ODE OTHER THAN KERNEL. 
18F $ > THE SIGNAL ARGUMENTS ARE ASSUMED TO BE SET UP PROPERL THE $ 
18F 637 : NOTE THAT THE PREVIOUS MODE FIELD uF THE Pst PCONTAING. THe ACEESS ‘NODE 
18F 6 8 : OF THE EXCEPTION 
at 
000000A ee .PSECT YEXEPAGED1 
A 46 EXESREFLECT:: ;REFLECT EXCEPTION 
01 od O0A 4 PUSHL #1 [SAVE CODE INDICATING SIGNAL 
03 BB OOA 44 PUSHR #*M<RO,R1> SSAVE REGISTERS RO AN DRI 
7E 03 CE OOAA 645 MNEGL #3,-(SP) ‘SET INITIAL FRAME DEPT 
5D DD OOAD 646 PUSHL FP :SET INITIAL HAND LER ESTABLISHER FRAME 
04 DD OOAF 64 PUSHL #4 :SET NUMBER OF MECHANISM ARGUMENTS 
ae 
9081 630 ; AT THIS POINT THE STACK HAS THE FOLLOWING FORMAT: 
0081 63¢ : 00<sP) = NUMBER OF MECHANISM ARGUMENTS (ALWAYS 4). 
0081 653: 4(SP) = FP OF HANDLER ESTABLISHER FRAME (TENTATIVE). 
00B1 654: O8<SP) = FRAME DEPTH (ALWAYS -3) 
00B1 655: 12(SP) = SAVED RO. 
00B1 636 : 16(SP) = SAVED R}. 
0081 657: O(SP) = FLAGS LONG 
0081 658: 4(SP) = NUMBER OF SIGNAL ARGUMENTS. 
0B1 659: 8(SP) = EXCEPTION NAME (INTEGER VALUE). 
0B1 660: 2(SP) = FIRST EXCEPTION PARAMETER (IF ANY). 
0B1 661: 6(SP) = SECOND EXCEPTION PARAMETER (IF ANY). 
0081 666 ; ‘ 
Bt ee : : 
0B1 665: B+Ne4(SP) = N'TH EXCEPTION PARAMETER (IF ANY) 
0B1 666: B+N*4+4(SP) = EXCEPTION PC. 
00B1 667: 8+N*4+8(SP) = EXCEPTION PSL. 
bop] 668 
50 oc 0081 $53 MOVPSL RO sREAD CURRENT P 
51 50 02 18 FF 085 671 EXTZV #PSLSV_CURMOD,#PSLSS_ CURMOD , ROR! EM URRENT MODE KERNEL? 
51 50 02 1 ED Sopa $78 CMPZV #PSLSV_PRVMOD,#PSLSS -PRVOD, RO,R1 :1S CURRENT EQL PREVIOUS? 
68 «(1 F 674 BEQL 408 IF EQL YES 
1 ok 
cl ee $ ADJUST PREVIOUS MODE STACK POINTER USING SYSTEM SERVICE 
C1 679° 
Ic C1 680 PUSHR #*M<R2.R > ;SAVE REGISTERS R2, R3, AND R4 
53 24 AE 0 1 C3681 ADDL3 #7, She eRS. [CALCULATE NUMBER OF LONGWORDS TO MOVE 
OlEF'CR GF O0CB 6 : PUSHAB W*NORMAL TASSUME INFORMATION CAN BE COPIED 
7E D4 OOCC 6 LRL <{SP) ?SET TO USE CURRENT STACK POINTER VALUE 
6 oF ce 684 PUSHAB (SP) [PUSH ADDRESS TO STORE UPDATED eT athe VALUE 
a a Ono Neat Ae ORM nate 
7E 50 85 16 EF 0007 6 $ EXTZV #PSL$V_PRVMOD,#PSL$S _pRVIAOD. RO,-(SP) ;PUSH ACCESS MODE OF STACK 
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THON FROM MODE OTHER THAN K SoSEPAIORG BSiet ice LenS eRCTEREEPY ON GAR: 1 


EXCEPTION = EXCEP p 
REFLECT aoe 6 §) 
03 * PUSHL :PUSH NUMBER OF ARGUMENTS 
00000000°9F $F 5 CALE (3p) aNSYSSADISTK SADJUST PREVIOUS MODE STACK POINTER 
ane TION 
E 
: 
: 
19 
1 
i 
i 
i 
i 
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i 
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zaman 


14 AE 0292"CF 108: MOVAB + 20(SP) iSET BAD 


“RETR 
10 AE 096000 oF4 MOV r i A TA k R2],16(SPS ; 
o00nes erg L GECTUBAL STACK R2I,16(SP) {SET 
4 


NTER VALUE 
CALLG (SP). SYSSAD :RELO TER 
7E  00000000'9F42 
—E 6€ 


o 
Oourw 


RO, 
a4 DECTLSAL _STACKCR2], “te 


ACK RANGE 
ADDL latsp P) (Ss P)7=(SP) 
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T 
of AE ACK RANGE 
aoe 
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S229 =m 
-_ wale. 


5E FROM STACK 


NT T 
VIOUS MODE STACK POINTER VALUE 
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EXCEPTION - EXCEPTION HANDLING 16-SEP-1984 00:06: AX/VMS Macro V04-00 Page 
v04 COMMON EXCEPTION EXIT g-8 oats 99:06:78 SYS.SRCJEXCEPTION.MAR; 1 . (ia) 
1 ¢ ~SBTTL COMMON EXCEPTION EXIT 
¢ : ALL EXCEPTIONS CONVERGE TO THIS POINT WITH: 
10C 0712: O(SP) = NUMBER OF SIGNAL ARGUMENTS. 
10 713: 4(SP) = EXCEPTION NAME (INTEGER VALUE). 
106 «714: (SP) = FIRST EXCEPTION PARAMETER (IF ANY). 
c gi ; 12(SP) = SECOND EXCEPTION PARAMETER (IF ANY). 
ae . 
12¢ r18 ; 4+N*4(SP) = N'TH EXCEPTION PARAMETER (IF ANY). 
12¢ : 4+N24+4(SP) = EXCEPTION PC. 
¢ f 1: 4+N*4+8(SP) = EXCEPTION PSL. 
1206 «67 : ; NOTE THAT THE PREVIOUS MODE FIELD OF THE PSL CONTAINS THE ACCESS MODE 
12€ 726 : OF THE EXCEPTION. 
ee 
0000018F 7 $ .PSECT $AEXENONPAGED,LONG 
or F 728 -ENABL LSB 
18F 729 EXESEXCEPTION:: ;THIS LABEL MUST BE GLOBAL FOR MP CODE 
01 DD 18 730 PUSHL #1 [SET CODE INDICATING SIGNAL 
3 BB 0191 731 PUSHR #*M<RO,R1> [SAVE REGISTERS RO AND R1 
7E 03 CE 0193 7 é MNEGL #3,-(SP) [SET INITIAL FRAME DEPTH 
5D DD 196 7 PUSHL FP [SET INITIAL HANDLER ESTABLISHER FRAME 
04 dD 198 , 4 PUSHL #4 :SET NUMBER OF MECHANISM ARGUMENTS 
198 736; 
O14 4 ? 3 AT THIS POINT THE STACK HAS THE FOLLOWING FORMAT: 
198 739: 00(SP) = NUMBER OF MECHANISM ARGUMENTS (ALWAYS 4). 
19h 740: 04(SP) = FP OF HANDLER ESTABLISHER FRAME (TENTATIVE). 
198 741: O8(SP) = FRAME DEPTH (ALWAYS =3). 
19A 14g : 12(SP) = SAVED RO. 
198 743: 16(SP) = SAVE : 
19h 744: O(SP) = FLAGS LONGWORD 
198 745: 4(SP) = NUMBER OF SIGNAL ARGUMENTS. 
19A 146 : (SP) = EXCEPTION NAME (INTEGER VALUE). 
19h 767: (SP) = FIRST EXCEPTION PARAMETER (IF ANY). 
19A 748 ; (SP) = SECOND EXCEPTION PARAMETER (IF ANY). 
19A 749; ‘ 
ign Fay 
198 7 ‘ : +N*4(SP) = N'TH EXCEPTION PARAMETER (IF ANY). 
19 753: +N*444(SP) = EXCEPTION PC. 
198 754: +N*4+8(SP) = EXCEPTION PSL. 
19A 736 ; 
19A , $ REFLECT: sREFLECT EXCEPTION TO PROPER ACCESS MODE 
50 18AE 06 (C1 is 138 ADDL #6 .24(SP) RO, [CALCULATE LONGWORD OFFSET TO SAVED PSL 
E40 05 196 760 sit C3P)EROI : PREVIOUSLY IN COMPATIBILITY MODE? 
51 09000000" E tad ree BOVAL SECILSAL CHCNTX,RI She Ans OF COMPATIBILITY CONTEXT AREA 
81 5 7D O1AF ter mova iste :SAVE R2 AND R3 
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"SSEp=19Be OSietsa8 ESrs!Saclexceprioncman:1 —"*%° (7g) 


sSAVE R4 AND RS 

sSAVE R6 

SET CM EXCEPTION TYPE 
;SAVE PC 


oow m- 


ori Ty LEVEL? 
BB $,R1 +308 iT hor ON INTERRUPT STACK 
BUG CHECK eiiist: Seth’ FATAL PTION 
IFNORD #4,@#CTLSAL NETACKS 208 

sPSLSV. PRVMOD ,#PSLS$S_ Pav ; 


L 
RMAL 


BVBaw-i aewwzD 
VO U1 FOO = 


Ser we + + 


:G0TO PAGED CODE 


$ 
YEXEPAGE cept 
#*McR2 ; SAVE REGISTERS R2, R3, 
u NORA AAA ASSUME INF ORMAT ION CAN BE COPIED 
RO,R iSAVE PREV 19U S MODE 
#7.40(SP) ,R3 ;CALCULATE NUMBER OF LONGWORDS TO MOVE 
R2_R SREAD PREVIOUS RODE” STACK POINTER 
CHECK STACK [CHECK STACK RANGE 
: CONT INUE iF St ACK OK 
#PSLSC_USER,R2 31S IT USER MODE STACK FAULT? 
5 NO, THEN BAD STACK 
#°M<R1,R2,R3> :SAV E REGISTERS 
RO,R :GET LOWEST STA ck ADDRESS FROM CHECK_STACK 
EXESEXPANDSTK AND STACK 


‘AND ER 
<R1,R2,R3> RESTORE | REGISTERS 
$ 'BR IF ANY ERROR TO, DECLARE BAD STACK 
3a§ : CHECK THE STACK 
NOTE= CHECK TOTAck PREVENTS US FROM LOOPING 
R1 ,@#CTLSAL_STACKCR2) $TOP ADDRESS” OF STACK IN RANGE? 


F_GTRU NO 
#PSLS$C_USER,R2 PREVIOUS MODE USER? 
1 Ry STACKLIMCR2); {BOTTOM ADDRESS OF STACK IN RANGE? 


;1F G 
W*BADSTACK SET BAD STACK RETU 
@*CTLSAL SEACKERZJ, R1 3GET STARTING ADDRESS OF PREVIOUS MODE STACK 
HECK_STACK K STACK RANGE 
HST A RANGE ghh 
ADDRESS OF STACK RANGE 
rig ty OF STACK RANGE 


CK SPACE 
UAL 4 tt LIMITS FROM STACK 
ADDRESS OF PREVIOUS MODE STACK 
ER fet BYTES TO MOVE 
OP OF STACK ADDRESS 
OUS MODE STACK POINTER 
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NG 16-SEP-1984 :06: AX/VMS Macro v04-00 Pa 5 
XIT oe iSet 90:06:28 SYS. SRCJEXCEPTION.MAR; 1 (ia) 
SUBROUTINE TO CREATE VIRTUAL SPACE WHERE THE STACK SHOULD BE. TOP 
OF Stack (UNDER THE CALL PC) IS A VA DESCRIPTOR; R2 CONTAINS ACCESS 
CRESTACK: 
SSETSFM_S #0 ;TURN OFF SYSTEM SERVICE EXCEPTIONS 
MOVAB ~4(SP),R1 TSET ADDRESS OF VIRTUAL ADDRESS LIMITS 
PUSHL RO SSAVE PREVIOUS STATE OF FAILURE MODE 
SCRETVA_S (R1),(R1),R2 SCREATE STACK PAGES FOR EXCEPTION 
wPL year amy: :WAS SYS. SERV. FAILURE EXCEP. SET? 
PUSHL R SYES, SAVE STATUS FROM S$CRETVA 
SSETSFM_S #1 ; SET IT AGAIN 
POP RO SRESTORE STATUS FROM SCRETVA 
10S: BLBC RO, VAFAIL [DEAL WITH FAILURE TO CREATE STACK 


THE BASE STACK. 
NAL STACK AND 
T ASE AND 


ON DEP ON ACCESS MODE OF 
USER AND SUPER MODE, WE QUIETLY DELETE 
ERNEL MODE WE BUGCHECK NON-FATALLY AND 


: NOTE: R2 CONTAINS PREVIOUS ACCESS MODE 
AFAIL: CMPL R2 #PSLSC_EXEC :CHECK ACCESS MODE OF EXCEPTION 
BLSSU § 


s;BRANCH IF KERNEL 
BGTRU 0$ BRANCH IF USER OR SUPER 
BUG _ CHECK UNABLCREVA NON-FATAL FOR EXEC MODE 
SDECPRC_S :BYE, BYE 
BUG_CHECK UNABLCREVA,FATAL FATAL FOR KERNEL MODE 


. & 
EXCEPTION = EXCEPTION HANDLING 16-SEP-19 AX/VMS Macro V04-00 Pa 
v04 SEARCH FOR AND CALL CONDITION HANDLER g- iets 1 88: 06: ri SYS.SRCJE EXCEPTION. MAR: 1 - (38) 
te i .SBTTL SEARCH FOR AND CALL CONDITION HANDLER 
let 3 PUSH ARGUMENT LIST ON STACK 
1EF : 
1EF -ENABL LSB 
1EF NORMAL : ; NORMAL EXIT FROM STACK COP 
6E DF OTEF 4 PUSHAL [PUSH ADDRESS OF MECHANISM ARGUMENTS 
1C AE DF O1F1 5 PUSHAL 2 (SP) [PUSH ADDRESS OF SIGNAL ARGUMENTS 
02 DD 1E6 66 PUSHL SPUSH NUMBER OF ARGUMENTS 
i $3 CHECK IF THIS EXCEPTION SHOULD BE MODIFIED BY AN INSTRUCTION EMULATOR 
51 00000000'EF 09 1F 0 MOVL L “EXESGL VAXEXCVEC,R1 :MODIFICATION ROUTINE SUPPLIED? 
02 13 O1FD 871 BEQL EXESSRCHANDLER SBRANC 
61 16 I te JSB (R1) SOTHERWISE, GO THERE 
4 74 CHECK THE PC OF THE EXCEPTION. IF IT IS IN THE CONDITION HANDLER CALL 
1 875 : VECTOR, THEN AN EXCEPTION HAS OCCURRED ATTEMPTING TO CALL A CONDITION 
0201 26 : > HANDLER (E.G., DUE TO BAD ADDRESS OR ENTRY MASK). IF THIS Is. THE CASE, 
0201 877 : EXIT THE IMAGE TO AVOID AN EXCEPTION LOOP. WE DO SAME FOR CAL 
0 01 28 ; TO AST ROUTINES. WHILE THIS IS NOT STRICTLY A BAD STACK, REPORTING THE 
01 879 ; EXCEPTION WITH THE AST CONTEXT RECORDED IN THE STACK kK IS‘ SUCH 
0201 880 : THAT IT IS NOT WORTH IT. THE SPECIAL CASE OF A T-BIT PENDING. EXCEPTION 
ot 81 i : IS ALLOWED SINCE THIS CASE CANNOT RESULT IN A LOOP. 
4 HY EXESSRCHANDLER: : SENTRY POINT FOR EXTERNAL Use 
23 AE 4024 AE 90 0 01 884 MOVE  36(SP),35(SP) SAVE SIGNA VECTOR LEN 
00000464 BF 28 Ar D1 0206 885 CMPL  40(SP).#SS$_TBIT TCHECK FOR T-it PENDING EXCEPTION 
19 13 020 86 EQL ~=s«10$ iBRANCH IF YES = SKIP K 
51 246 AE 08 Ci 021 8 ADDL3 «#8 36(SP) R1 : COMPUTE LONGWORD OFFSET TO SAVED PC 
00000000'8F 6641 01 1 BR CMPL (SP)CR1I,#SYSSCALL_ HANDL ” >COMPARE TO HANDLER CALL SITE 
4E 13 0210 889 BEQL § BAD_HANDLER : BRAN YE 
00000000'8F 6€41 01 0 1F 890 CMPL (SPYCRIJ,#EXESASTDEL | :COMPARE TO AST CALL SITE 
SE 13 7 891 BEQL _BAD_AST ‘BRANCH IF YES 
0559898 
4 a 3; SEARCH FOR CONDITION HANDLER 
O345'CF 6€ FA 9 % 10S:  CALLG (SP), W*SEARCH ;SEARCH FOR CONDITION HANDLER 
6D 50. —s«E9 F 97 BLBC =—_- RO, 208 SIF LBC FATAL ERROR 
06 20 AE 01 €1 1 899 BBC 32(SP),11$ RANCH IF THIS IS NOT A STOP 
28 AE 4203) CO00s«ét*é«*F'CD 6 00 INSV estes SEVERE ,#STSSV_ sevERity #STSSS SEVERITY, 40(SP) 
¢ ; SFOR STOP, FORCE SEVERITY TO FATAL 
¢ $08 + CALL CONDITION HANDLER 
€ 905° 
00000000 ' 9F 16 9 6 11$:  JSB @#SYSS$CALL_HANDL CALL HANDLER VIA SYSTEM VECTOR 
£50 € 49 3 BLBC —_ RO, 1 :IF LBC RESIGNAL 
12 20 aE 01 €0 45 BBS #1,32(SP) .CONT_FROM_STOP’ tBRANCH IF ATTEMPTING TO CONTINUE FROM STOP 
4A : CONTINUE FROM EXCEPTION. REMOVE THE SIGNAL ARGUMENT LISTS FROM THE 
4A Ni : STACK AND RESUME PROCESSING. 
4A 18 EXESCONTSIGNAL:: 


EXCEPTION - EXCEPTION HANDLING 16-SEP-1984 00:06: AX/VMS Macro V04-00 Pa 7 
V06=" SEARCH FOR AND CALL CONDITION HANDLER ae et 1 99:06:28 SYS. SRCJEXCEPTION.MAR; 1 9 (50) 
6— 23 AE 9A 026A 16 MOVZBL 35(SP) (SP) 3GET ORIGINAL SIGNAL ARG COUNT 
6E 0 C0 oF 1 ADDL #8, (SPS SCALCULATE LONGWORD OFFSET TO SAVED PC 
6E g 18 MULL #4. (SP) [CALCULATE NUMBER OF BYTES TO REMOVE 
50 18 AE 6 91 MOV 4 (SP) RO SRESTORE RO AND R1 
SE GE f 8 1 ADDL SP) ,SP SREMOVE ARGUMENT LIST FROM STACK 
c o 
c $ TO HERE ON ATTEMPT TO CONTINUE FORM A CALL TO STOP 
¢ 4 CONT_FROM_STOP: :SET FINAL STATUS AND MESSAGE 
50 00000001'8F 00 3¢ 3 s MOVL  #<LIBS_ATICONSTOB“CSTSSM. SEVERITY>!ATTCONSTO_IDX,RO 
FFFFFFFD 8F = 14 AE D1 026 $ CMPL 40(SP) 78-5 TSEE IF JUST CALLED CAST CHANCE HANDLER 
12 «11 68 BRB 2$ SAND FLOW INTO EXIT CODE 
D : 
é 2 9 3; TO HERE IF AN EXCEPTION OCCURRED ATTEMPTING TO CALL A HANDLER 
6) 9 : BAD_HANDLER: 
50 28 AE 00 6p 9 MOVL  40(SP),RO :SET CONDITION AS FINAL STATUS 
1 934 “SET MESSAGE STRING 
50 03 90 02 FO 0271 935 INSV #BADHANDLER_IDX,#STSSV_SEVERITY ASTS$S_SEVERITY,RO 
FFFFFFFD BF 20 AE41 D1 0276 9 6 CMPL (SP)CR1J,8=3 7SEE IF TRYING TO CALL LAST CHANCE HANDLER 
1D 12 OO7F 937 12$:  BNEG $ tIF NOT, GO TO CALL IT 
20 AE 50 00 0281 938 MOVL  R0O,32(SP) ‘SAVE CONDITION AND MESSAGE 
so. 4 83 939 BRB 30$ SIF YES, DON'T CALL IT AGAIN cl 
87 941; CT 
6 87 ae : TO HERE IF AN EXCEPTION OCCURRED ATTEMPTING TO CALL AN AST cr 
87 944 BAD_AST: CT 
50 28 AE 00 87 945 MOVL 40(SP),RO 7SET CONDITION AS FINAL STATUS cT 
88 946 “SET MESSAGE STRING CT 
50 03 00 O03 FO 0288 94 INSV #BADAST_IDX, #STSSV_SEVERITY ,#STS$S_SEVERITY,RO CT 
oc (11 0 3 48 BRB 20$ cr 
9 3 930 : BAD STACK WHEN TRYING TO COPY EXCEPTION ARGUMENTS ex 
9 as * EX 
9 32 BADSTAC :BAD STACK EXIT FROM STACK COPY EX 
6E DOF 0292 954 PUSHAL (SP) [PUSH ADDRESS OF MECHANISM ARGUMENTS EX 
1C AE DF 0294 955 PUSHAL 28(SP) ‘PUSH ADDRESS OF SIGNAL ARGUMENTS EX 
92 DD 0297 996 PUSHL #2 [PUSH NUMBER OF ARGUMENTS EX 
99 92 “SET BAD STACK STATU EX 
50 0280 8F 3¢ 99 938 MOVZWL #<SS$_BADSTACKE*CSTSSM_SEVERITY>!F INAL_IDX,R eX 
20 AE 650 =o H 320 20$:  MOVL  RO,32(SP) ;SAVE FINAL STATUS AND MESSAGE EX 
A2 961 SSETSFM_S #0 : CLEAR SYS. SERVICE FAILURE EXCEP. MODE EX 
50 DC O2AB 96¢ MOVPSL “READ CURRENT PSL EX 
50 50 083 18 EF Q2AD 96 EXTZV #PSL$V CURMOD »APSL SS CURMOD,RO,RO ;EXTRACT CURRENT MODE EX 
51 00000000'9F4 bg Be 964 ROVL #CTLSAL_FINALEXC R T.R1;GEF_ ADDRESS OF LAST CHANCE HANDLER eX 
14 AE f B 66 MNEGL #3,20(SP) °SET FRAME DEPTH TO MINUS THREE EX 
00000000'9F 16 O2¢ 6 JSB Q#$YSSCALL_HANDL [CALL LAST CHANCE CONDITION HANDLER EX 
oc 11 i : BRB 5 eX 
50 pvc O2c $3 30$:  MOVPSL RO ;READ CURRENT PSL EX 


EXCEPTION = EXCEPTION HANDLING 16-SEP-1984 AX/VMS Macro V04-00 P 
v0G= SEARCH FOR AND CALL CONDITION HANDLER g-8E P=| 1384 88: 96: rs oe SRCJEXC OPTION. MAR; 1 ory (38) 
50 50 18 EF O2CA 97 EXTZV — #PSLSV_CURMOD ,#PSLSS_CURMOD, RO RO. SEXTRACT CURRENT MODE 
95 ; D1 cE re CHP #" Se EE CCRS EXECU KERNEL MODE? 
50 20 aE 5 5 ff pe 74 35$:  EXTZV #STS$V_SEVERITY,#STS$S slate aM RO ;GET MESSAGE INDEX 
0000000°9F 93 OgdA 97 TSTB  @ACTLSGB_SSFILTER STEM SERVICES INHIBITED? 
OF 12 06 BNEQ 40 ive ; SOON T TRY TO PRINT ANYTHING 
6— OF O2E 7 PUSHAB (SP) SPUSH ADDRESS OF CONDITION ARGUMENT LIST 
FD17 CF40 «ODS COE 28 USHL MSG_VECTORCRO) [PUSH ADDRESS OF FINAL EXCEPTION MESSAGE 
00000000'EF 02 F E 7 CALLS #2,EXESEXCMSG ;PRINT FINAL EXCEPTION MESSAGE 
50 20 AE D F 0 40$ MOVL 32¢SP),RO RETRIEVE FINAL STATUS 
50 03 00 O04 F F 1 INSV #STSSK_ SEVERE ,ASTSS$V _sevintt. aSTS$S SEVERITY,RO 
F ¢ EXIT_S R PROCESS 
06 1A 0 4 45$:  BGTRU 50% ;BRANCH IF KERNEL MODE 
3 985 BUG_CHECK FATALEXCPT SFATAL EXECUTIVE MODE EXCEPTION 
E11 08 3 : BRB 40$ :GO DELETE THE PROCESS 
OA 988 50$:  BUG_CHECK FATALEXCPT, FATAL ;FATAL KERNEL MODE EXCEPTION 
0— 990 .DSABL LSB 
ae 
t43 $38 | ; COPY ARGUMENTS TO PREVIOUS MODE STACK AND EXIT TO PREVIOUS MODE 
30E «995° 
Seo 996 COPYARGS: :COPY ARGUMENT LISTS TO PREVIOUS MODE STACK 
50 10 AE 9E O30E 997 MOVAB 16(SP),RO :GET ADDRESS OF ARGUMENTS TO C 
81 80 DO O31 998 10$:  MOVL (RO)+,(R1)¢4 : COPY EXCEPTION ARGUMENTS 19 PREVIOUS STACK 
FA 53. «FS 31 999 SOBGTR RS. 10$ Y MORE LONGWORDS TO COPY 
70 8000010 BF CA 0318 1000 it CM!PSL$M_TBIT!- CLEAR COMPATIBILITY, T-BIT, T PENDING, AND 
1F 1001 Psi M_FPDIPSLSM-TP,-(RO) ;:FIR st PAR > 
70 BEDO O31F 100¢ POPL SET DRESS 
1C BA ge 1 6 POPR phere, R3,R4> ‘aE cTonE UR GtSTERe R R2, R3, R4 
SE 50 DO 0324 1004 MOVL RO, SP SREMOVE ARGUMENTS FROM KERNAL STACK 
02 0327 1005 REI ; 
358 1009 
03 8 ; SUBROUTINE TO CHECK ACCESSIBILITY OF STACK ADDRESS RANGE 
§ 1010 ; INPUTS: 
1011 : R1 = STACK POINTER 
I : R3 = PARTIAL LONGWORD COUNT 
1014 ; OUTPUTS: 
1015 ; 0 = BOTTOM ADDRESS OF RANGE 
16 : 2 CONDITION CODE - 0 IF ACCESSIBLE, ELSE 1 
18 : R1,R2,R3 ARE PRESERVED. 
1020 CHECK_STACK: ZCHECK STACK ADDRESS RANGE 
OF 88 1021 PUSHR #*M<R1,R2,R3> SSAVE REGISTERS 
51 53 «1 C A 1 5 ADDL3 #3+1+17,R3,R1 SCALCULATE TOTAL LONGWORDS IN RANGE 
7 ow : 1 MULL [CALCULATE NUMBER OF BYTES IN RANGE 
50 6 51° C3 1024 SUBL3. -R1.(SP),RO :CALCULATE BOTTOM ADDRESS OF RANGE 
g dD 3 1025 PUSHL R :SAVE THIS QUA*™ TY 
D4 1 6 CLRL. oR SACCESS MODE Tu 4AXIMIZE WITH PSL<PRVMOD> 
00000000'EF 16 9 1 JSB EXESPROBEW [CHECK WRITE ACCESS 


ANMNMUYNMMNMNMNMMN ~~ = 


E 
s 
$ 
Ss 
$s 
$ 
$s 
$s 
$ 
$ 
$s 
$ 
$s 


~ 
oo 
Nc 
~ 
e 
oa 
@ w 
a w 
a 
oS 
Le) 
oa 
*. a 
=< 6 
Oo vw 
s* 
f ee 
a2 
_ he 
Se oO 
a 2 
Ow ~ 
wo w 
vx aw 
au Oc 
zm wow 
va 2H 
zn» oO-; 
> 2 iD 
“Oo WO 
zn ste 
oe 4'*): 4 
oawZz 
VvVone 
conm -—w> 
Sr KNEE 
7 «. tesla ws 
o—- Ha « 
ow eererere 
om 
oo 
ww 
coco 
on 
yvuEy 
ad ww 
usu a 
mn & 
te N 
wun a 
_— . 
- 
a 
— 
j oO 
ao = L. 4 
= & 
* oo 
— 
= 
z 
oOo wo 
—- -a ww 
- =—OS 
— @oa a 
a 
=z 
oO 
vv 
oO 
24 
“J 
por 
vw 
25 288m 
a 
oe eo 
z 
oa 


seagrommerreleneneening 


vw 


EXCEPTION G ° 16-SEP-1984 00:0 AX/VMS M v04-00 Page 30 | 
voee000 N HANDLER ~SEP=1984 < 83: af: £8 USys. SRCJEX CEPT ION.MAR; 1 3 


-SBTTL SEARCH FOR CONDITION HANDLER 
SEARCH = SEARCH FOR CONDITION HANDLER 


THIS IS A SPECIAL INTERNAL ROUTINE THAT IS CALLED _IN THE INITIAL SEARCH 
FOR A aha HANDLER AND ON RESIGNAL FROM A PREVIOUSLY SIGNALLED 


or 


CONDITION. 
INPUTS: 
OC(AP) = NUMBER OF CONDITION ror Ti 
4(AP) = ADDRESS OF SIGNAL ARGUMENT L 
HS = ADDRESS OF MECHANISM ARGUMENT LIST. 
12(AP) = N CHANISM AR 
Nar = FP OF HANDLER ESTABLISHER FRAMC. 
(AP) = FRAME Ro. 
4(AP) = SAVED R 
8(AP) = SAVE 4h 
2(AP) = FLAGS L ORD 
6(AP) = NUMBER OF ST GNAL ARGUMENTS. 
4Q(AP) = EXCEPTION NAME (INTEGER VALUE). 
44(AP) = $ CEPTION PARAMETER (IF ANY). 
48(AP) = SECOND EXCEPTION PARAMETER (IF ANY). 
40+N*4(AP) = N'TH EXCEPTION PARAMETER (IF ANY). 
4O+N*44+4(AP) = EXCEPTION PC. 
4O+N*4+8(AP) = EXCEPTION PSL. 


OUTPUTS: 
RO LOW BIT CLEAR INDICATES FAILURE TO LOCATE CONDITION HANDLER. 
RO = SS$_ACCVIO = STACK CANNOT BE READ FROM CURRENT MODE. 
RO = SS$_NOHANDLER = NO CONDITION HANDLER COULD BE FOUND. 
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7 
3 u RO LOW BIT SET INDICATES SUCCESSFUL COMPLETION. 
3 u R1 = ADDRESS OF CONDITION HANDLER. 
7 
oF .ENABLE LSB 
4 07 SEARCH :SEARCH FOR CONDITION HANDLER 
0000 034 ? .wORD 0 SENTRY MASK 
6D O3F3'CF 9 4 0 MOVAB W“EXESSIGTORET, (FP) [SET ADDRESS OF CONDITION HANDLER 
50 10 AC D 4 1 10$: OVL  16CAP),RO [GET PREVIOUS FRAME ADDRESS 
51 DC 3 : 20$:  MOVPSL R1 "READ CURRENT PSL 
51 51 O02 18 EF EXTZV  #PSLSV_CURMOD,#PSLS$S_CURMOD,R1,R1_;EXTRACT CURRENT MODE 
14 AC 06 3 4 NCL g0(AP)” s INCREMENT FRAME DEPTH 
ee A 5 BEQL 0$ TIF EQL FIRST STACK 
18 14 2¢ 6 GTR 40$ SIF GTR OTHER STACK FRAME 
50  00000000'9F41 7E ‘ MOVAQ af TEgAQ EXCVECCR1],RO :GET ADDRESS OF EXCEPTION VECTOR QUADWORD 
14 AC FFFFFFFE ar D1 036 8 CMPL = #2, 200( AP) TEXAMINE PRIMARY VECTOR? 
2 13 O36€ BEQL 30 [IF EQL YES 


EXCEPTION 
v04-0 


nf 


Dd 
70 16 AC 
10 AO 00000004 '8F 
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1 :0 AX/VMS Macro V04-00 Page 31 
TS PL A rd Be TST TR oe dt, 
(RO}+ ;ADJUST TO SECONDARY VECTOR 
(RO) ,R1 GET ADDRESS OF CONDITION HANDLER 
iat ;1F NEQ CONDITION HANDLER FOUND 
22(AP) ,100$ TIF LBS SEARCH COUNT OVERFLOW 
CHECK_f ich K IF THIS FRAME IS VALID 
#SYSSCALL_HANDL +4, SAVPC(R ) ;CALL FROM CONDITION DISPATCHER? 
70$ sBRANCH IF YES = MUST SKIP FRAM 
SAVEPCRO) -RO :GET ADDRESS OF PREVIOUS FR 
RO, 16(AP) SAVE ADDRESS OF ESTABLISHER FRAME 
CHECK FP [CHECK IF THIS FRAME IS VALI 
(RO) RI GET ADDRESS OF CONDITION HANDLER 
#1,RO ;INDICATE SUCCESSFUL COMPLETION 
“TB: » SAVMSK K(RO),R1 :GET REGISTER SAVE MASK 
An K(RO),-(SP) :GET STACK ALIGNMENT BIAS 
#SAVRG SADD OFFSET TO REGISTER SAVE AREA 
(SP)+,RO SADD STACK ALIGNMENT BIAS 
R1,90$ TIF LBC CORRESPONDING REGISTER NOT SAVED 
#4-RO SADJUST FOR SAVED REGISTER 
#-1,R1,R1 sANY MORE REGISTERS SAVED? 
80$ SIF NEQ YES 
CHF SL_MCHARGLST+4(RO),R1;GET ADDRESS OF MECHANISM ARGUMENTS 
CHFSL-MCH_FRAME(R1),RO ;GET ADDRESS OF ESTABLISHER FRAME 
CHF $L-MCH-DEPTH(R1) [CHECK IF THIS IS A VECTORED HANDLER 
4 ; tIF SO, DON'T SKIP ‘ESTABLISHER’ 
SUBROUT INE TO VALIDATE THE CURRENT FRAME ADDRESS. THIS IS DONE WIT 
HECK AGAIN ST THE STACK LIMIT REGISTERS IN THE P1 VECTOR PAGE. 
AGES EXTEND ACROSS ACCESS MODES, THERE IS NO OTHER CHECK 
ER MODE EXCEPTION OUT TO AN OUTER 


R1 ;READ CURRENT PSL 
#PSL$V_CURMOD ,#PSL$S CURHOD - R1,R1_ ;EXTRACT CURRENT MODE 
RO ,a#CTLS$AL STACK R1J FRAME POINTER WITHIN STACK RANGE? 


t1F GTRU NO 
#PSLSC_USER,R1 [IF IN USER MODE 
:SKIP TOP RANGE CHECK 
RO @#CTLSAL_STACKLIMCR1): FRAME POINTER WITHIN STACK RANGE? 
és [IF LSSU NO 
*STACK FRAME OK 
#SS$_NOHANDLER,RO :SET NO HANDLER FOUND 


-DISABLE LSB 
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Excery ON WAL ING ote 1 mise ts 7 00:06:38 AX/VMS Macro V04-00 Page (35) 


N EXCEPTION INTO RETUR 5-SEP- SYS.SRCJEXCEPTION.MAR; 1 
3. ~SBTTL EXESSIGTORET = TURN EXCEPTION INTO RETURN STATUS 
; FUNCTIONAL DESCRIPTION: 


: THIS IS A CONDITION HANDLER THAT TURNS AN EXCEPTION 
; FRAME INTO A RETURN FROM THE ESTABLISHER FRAME WITH 
: HE STATUS. EXCEPTIONS FROM ANY FRAME OTHER THA 
; Ate TRESTGNALTED. UNWINDS ARE GNO RED. 

; INPUT PARAMETERS: 

; OCA NUMBER OF CONDITION ARGUMENTS. 

: RtAP) = ADDRESS OF SIGNAL ARGUMENT LIST. 

; BAP) = ADDRESS OF MECHANISM ARGUMENT LiST. 
: OUTPUT PARAMETERS: 
: RO = COMPLET 


ION STATUS CODE 
SS$_R 


ON S$ 

ESIGNAL = ALWAYS 
EXESSIGTORET:: 

0000 ~ WORD 

ASSUME $L_MCHARGLST,£Q, CHFSL SIGARGLST+4 

mova $L~SIGARGLST (APS ,RO GET DRESS OF SIGNAL ARGUMENT LIST 

$_ONWIND, CHFSL_SIG_ Nai ( 0) ;UNGINDING? 


ES 
$L_MCH_DEPTH(R1) ; : EXCEPTION WITHIN ESTABLISHER FRAME? 
t BRANCH AND RETURN RESIGNAL IF NO 
MOVL § CHFSL_SIG_NAME(RO),CHFSL_MCH_SAVRO(R1) ; SET RETURN STATUS 
CLRQ -(SP) ; CLEAR A AND NEW PC ARGUMENTS 
CALLS #2,W*EXESUNWIND : UNWIND TO ESTABLISHER'S CALLER 
10S: HOVZUL #SS$_RESIGNAL,RO + RETURN RESTONAL STATUS 


50. = 04 AC 

04 AO 00000920 of 
08 Al 

oc 

OC Al 04 AO 
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ANDLING 16-SEP-1984 00:06: AX/VMS Macro Vv04-00 Pp E) 
EXPAND USER STACK mit PS a Bd Aes TST TE es 


‘ ~SBTTL EXESEXPANDSTK = EXPAND USER STACK 
FUNCTIONAL DESCRIPTION: 
EXPAND STACK IS CALLED 8 
TO ALLOCATE MORE SPACE T 


INPUT PARAMTERS: 
R2 = VIRTUAL ADDRESS LOWER BOUND FOR STACK. 


OUTPUT PARAMETERS: 


Y EXESACVIOLAT, REFLECT, AND SYSS$ADJSTK 
O THE USER STACK. 


Sete Ge Se Se Ge Ge Ge Ge Se Ge Ge Ge Ge Ge 


RO = COMPLETION STATUS CODE 
SS$_NORMAL = SUCCESSFUL 
SS$-VASFULL -VIRTUAL ADD 
SS$"PAGOWNVIO = PAGE OWN 
SS$"EXQUOTA = PAGING FIL 
SS$_INSFWSL = INSUFFICIEN 


EXESEXPANDSTK:: 
PUSHR 


BBB BBB PPP PPP PPP PPP PPP PPE PPP PP PPP PEPE EEE EEE UU 


WO O0000 000909 09 IIA OO AUIUTUI  B  B  EAII0  O O ee  e  _— 


RSB 


PIMNNININS 4 9 9 | MOOD DOOOOOO OOO OOOO OO 0900 0909 09 00 09000909 II 


MEW OOO NAUES WN OOD NA NE WIN  O OD NAME WIN O OO NOUS WH OOO 
ow 
= 
= 


POPPOPOPOPONONPOPOPOPOPOPOPONINONINIPNPIPIPUNNINDYD 2 ess KT 


SOFNS POV LMT MO OVMIM OWA LOST NOOP,PWOPY>>>r>r>r Yr Y?YrrYr,r,r?rrrr 2 
dd 


3 BB #°M<R1,R2,R3,R4,R5> t SAVE WORKING REGISTERS 
54  00000000'°9F D0 MOVL a@#CTL$GL_PC : GET PCB ADDRE 
0000000C'9F 52. 01 CMPL R2,@#CTLSAL_STACK+12  ; IS ADDRESS IN USER STACK? 
SE OA BGTRU + NO, DEFINITE ACCESS VIOLATION 
SA 52 iE— €1 BC #VASV_P1,R2,50$ : BR IF NOT P1 SPACE ADDRESS 
55  00000000'9F 0 MOVL a#CTLSGL’PHD,RS : GET PHD ADDRESS 
00000000" EF 16 § GSPTEINDX t GET LW INDEX TO PTE IN PHD 
1 9 E9 BLBC ~—>_-«rRO : BR IF JUST EXPAND REGION 
6C B443 DS TSTL  a@PCBSL_PHD(R4)CR3I : CHECK PTE OF ACCVIO 
44 12 BNEQ 50$ ; IF NO TY 
53 He: 10$: INCL = RB + NEXT PTE INDEX 
6C B443 OD TSTL PCBSL_PHD(R4) (R32 : CHECK PTE FOR EMPTY 
08 12 BNEQ 0$ : NO, STOPPER FOR CREAT 
52. 0200 C2 9€ MOVAB 512(R2),R2 : AUGMENT VA BY ANOTHER PAGE 
F111 BRB 10$ : AND TRY ANOTHER PAG 
52 30 A5 00 208: MOVL PHDSL_FREPIVA(RS).R2  ; SET ENDING ADDRESS TO FREPIVA 
04 AE Dp 0$: PuSHiL 4 (SP) : BUILD INADR DESCRIPTOR 
53 3¢ oF MOVAG =(SP),R3 : CREATE SPACE FOR RETADR 
SCRETVA_S 8(R$),(R3),APSLSC_USER: CREATE SPACE 
1350 €8 BLBS ~RO,40$ : BR IF SUC 
50 sD PUSHL R : SAVE ERROR STATUS 
SDELTVA_S (R3),8(R3),#PSLSC_USER: DELETE PARTIAL AREA 
50 BED POPL “RO : RESTORE COMPLETION CODE 
5E 19 c 40$: ADDL #16, SP : CLEAN STACK 
50 oc C 50$:  MOVZWL #SS$_ACCVIO,RO ; SET ERROR STATUS 
E BA 60$: POPR  #*M<R1,R2,R$,R4,R5> t RESTORE REGISTERS 
AND RETURN 


ase 
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EXCEPTION = EXCEPTION HANDLING 16-SEP-1984 00:06: AX/VMS Macro V04-00 Page 34 E) 
V06= EXESMCHK_PRTCT = MACHINE CHECK RECOVERY ety 7 §9:06:28 SYS.SRCJEXCEPTION.MAR; 1 ° (32) ve 
49 ~SBTTL EXESMCHK_PRTCT = MACHINE CHECK RECOVERY BLOCK 
490 1 p++ 
49 9 ; EXESMCHK_PRTCT “ENABLE RECOVERY BLOCK FOR MACHINE CHECK EXCEPTIONS 
49 : : FUNCTIONAL DESCRIPTION: 
490 1234: ALLOW A SPECIFIED BLOCK OF KERNEL CODE TO PROTECT ITS SELF 
490 1235 : FROM FATAL MACHINE CHECKS, THEN FIND OUT IF ONE OCCURED WITHING 
49 $ F THE EXECUTION OF THE BLOCK. 
49 8 > INPUTS: 
490 1240 : RO = FUNCTION MASK TO FILTER SPECIFIC TYPES OF MACHINE CHECKS 
490 1241 : (SP) = RETURN ADDRESS (START OF RECOVERY BLOCK) 
490 1 4g : 4(SP) = END OF RECOVERY BLOCK ADDRESS 
490 1243 : MUST BE IN KERNEL MODE 
£38 ! rf: 3 CODE IN RECOVERY BLOCK EXECUTES AT IPL 31 
0490 46 : OUTPUTS: 
0490 1248 : WHEN INSTRUCTION AFTER END OF RECOVERY BLOCK IS REACHED, 
490 1249 : 0 = 0 IF MACHINE CHECK OCCURRED 
490 1250: Ri = 1 IF MACHINE CHECK DID NOT OCCUR 
490 31 ; ALL OTHER REGISTERS PRESERVED 
0490 38 : CALLING SEQUENCE: 
0490 1255: PUSHAL END_LABEL ; LABEL, END OF RECOVERY BLOCK ON STACK 
0490 1 36 ; MOVL + FUNCTION FILTER MASK 
0490 1257: JSB EXESMCHK_PRTCT : INITIATE RECOVERY BLOCK 
9499 38 ; ‘ : PROTECTED CODE, EXECUTED AT IPL 31 
490 1260 : ’ 
ret 1261 : RSB : END OF RECOVERY BLOCK RETURN 
0490 1 68 > END_LABEL: : END OF RECOVERY BLOCK LABEL 
049 1263 ; BLBS RO, MCHK_OK ; IF LBS, NO MACHINE CHECK OCCURED 
49 64 : BRW MCHK_ERROR : ELSE, CODE FAULTED 
848 1 66 : 
000001 6 .PSECT $AEXENONPAGED,LONG 
4 ! 63 EXESMCHK_PRTICT:: 
7E Q000'CF 7D O1F3 1 8 MOVQ  W*MCHKSGL_MASK,-(SP) ; SAVE PREVIOUS MASK AND SP = RECURSIVE 
7B 1 re : SO MACHINE CHECK HANDLER CAN USE PRTCT 
178 127 DSBINT : GO TO IPL 31 FOR REMAINDER OF BLOCK 
Q000'CF 50 DO OIFE 127% MOVL  RO,W*MCHKSGL_MASK : CURRENT FUNCTION MASK 
0000'CF SE DO ; 1275 MOVL SP. W°MCHKSGL~SP : SAVE CURRENT SP FOR POTENTIAL RECOVERY 
0c BE 16 id: JSB a<$24>(SP) + CALL PROTECTED CODE BACK 
8 ; IF PROTECTED CODE EXECUTED WITHOUT A MACHINE CHECK, IT RETURNS HERE 
50 01 3¢ : 6 MOVZWL #SS$_NORMAL RO ; NORMAL COMPLETION, NO MACHINE CHECK 
: ' § 3; RESTORE MASK AND SP OF OLD, FINAL RETURN TO CALLER 


H 9 

EXCEPTION = EXCEPTION HANDLING 16-SEP-1984 00:06: AX/VMS Macro Vv04-00 Page 35 E) 
v04- EXESNCHK PATCH = MACHINE CHECK RECOVERY §-§ ety 99:06:28 SYS. SRCJEXCEPTION.MAR; 1 . Gay v¢ 

E 1 4 PROTECT_RETURN: ; COMMON RETURN TO END OF RECOVERY BLOCK 

QOOO'CF 04 AE 7D § 1 § MOVQ <1#4>(SP),W*MCHKSGL_MASK ; RESTORE PREVIOUS MASK AND SP 
1 ENBINT ; "BACK TO ORIGONAL IPL 
SE OC co 17 1 § ADDL #<3*4>,SP ; CLEAN P STAC 
1A 1 RSB ; FINAL RETURN TO CALLER AT END OF 
1B 1290 ; RECOVERY BLOCK LABEL 
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JS 
NOMMACHINE CHECK RECOVERY ‘S-SEP=19B4 Oo:e1:48 EerSvsmcIEKcEPY ion -man;1 "29° (38, 


p++ 


; EXESMCHK_BUGCHK = HANDLE ALL BUGCHECKS FOR WHICH PROTECTION IS DESIRED 
FUNCTIONAL DESCRIPTION: 


THIS REOUTINE i$ CALLED FROM WITHIN ayer CHECK HANDLER JUST 
BEFORE bPEVLNG A FATAL BUG-CHECK. rie A CURRENT 4 LA ev BLOCK 
1 IN EFFECT, A RETURN IS MADE AT THE END OF RECOVERY BLOCK LABE 
AFTER PROTECTED CODE. ELSE, IF NO PROTECTION BLOCK IN EFFECT, RETURN 
TO MAHCINE CHECK WHICH ISSUES THE FATAL BUG-CHECK. 
INPUTS: 
(SP) = RETURN ADDRESS TO MACHINE CHECK 
4(SP) =A S OF MACHINE CHECK PC,PSL FROM EXCEPTION 
8(SP) = FUNCTION FILTER MASK BUILT BY MACHINE CHECK, DESCRIBES THE 
i etter tone CHECK FOR TESTING AGIANST MASK SPECIFIED BY 


OUTPUTS: 
IF NO RECOVERY BLOCK IN EFFECT: 
PC,PSL POINTER AND MASK REMOVED FROM STACK 
$8 BACK TO MACHINE CHECK 
ALL REGISTERS PRESERVED 
IF RECOVERY BLOCK IN EFFECT: 
MODE, IPL, STACK SET TO THAT IN EFFECT WHEN RECOVERY BLOCK 
RO - cove INDICATING MACHINE oGEck occuren 


RETURN TO END OF RECOVERY BLOC 
ALL OTHER REGISTERS PRESERVED 


Be Ge Se Ge Ge Se Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Se Se Se Ge Ge Ge Ge Ge Se Ge Ge Ge 


EXESMCHK_BUGCHK:: 


a a a a a a a a a aed | IE 
fosTesTostesfestesTestostecdesTestesTosTosTesTostesToslestocloslestosTeclosTosleslesTestestesTosTosTesloslestosTosTostesles) 


ee ee a a a ee ee a ee ee ee a a a a 
CONAWNE WN OOO NAUE AN SO OO NAU EWIDO OD NOAM EWN 2 0 OO NA NEW OC ODNOAUE UP 


PIPIPIPIMPIPPIPIPPIMPNINIPIPINIPIPYPIPYPIPINIPIPIPIPIPIPIPIPIPIPIPIPIPIPIPIPIPUNIPONoToPonopopnopnoponspornrrn © 0 


SOOOSOOOOOOOOOSOOOOCOOCOOCOCOOCO SOOO OOOCSOOOOCOCOCOOOCOOCOOOOOOOOCOOCOCOOCOSOO Om 


07 88 PUSHR #*M<RO,R1,R2> : SAVE SOME REGISTERS 
51 10 AE 7D 021D MOVQ = <4#4>(§P) <R1 : GET PC,PSL POINTER AND MASK 
F 10 1 BSBB  MCHK TEST : CURRENTLY A RECOVERY BLOCK? 
OA 9 £ 3 BLBS RO 138 s BRANCH IF YES 
BA 6 10$ POPR #*<RO,R1,R2> : NO RECOVERY BLOCK, RESTORE REGS 
04 AE BE OD MOVL  (SP)+,4(SP) : MOVE RETURN A ADDRESS UP ON STACK 
SE 04 ¢ C ADDL  #<4*15,SP : CLEA AR sth CK OF MASK 
F RSB : RETURN TO MACHINE CHECK HANDLER 
52 Q1 BA 15$:  BICB #ICHKSH LOG,R2 : IGNORE LOG INHIBIT BIT 
0000'CF 52 D3 BITL W“MCAKSGL_MASK ; PROTECTION DESIRED HERE? 
FC 1 BEQL : NO, RETURN TO MACHINE CHECK 
BA A POPR #R<RO, RI »R2> : RESTORE REGISTERS 
SE 04 AE DO MOVL 4 (SP) : RESET STACK TO INTERRUPT PC,PSL 
6E  0246'CF 4 MOVAL w*20$, a : REI BACK HERE INSTEAD 
4 REI : BACK TO PROTEC FD CODES" MODE, ETC. 
50 O2BC BF 3C 0246 20$:  MOVZWL #SS$_MCHECK,RO : ERROR CODE IN R 


Excer ON 


SE 


0000' CF 
BC 


XCEPTION HANDL 
EX SMCHK_PRTCT = 


Y 8858 1385 


ING 


MACHINE CHECK RECOVERY 


MOVL 
BRB 


W*MCHKSGL_SP,SP 
PROTECT_RETURN 


"SSEP=19Be OS:2F328 USNS USRCHESEER Yon cman: 1 


; RESET STACK FOR RETURN 
; RETURN TO END OF PROTECTED CODE 


rm 


vi 


EXCEPTION = EXCEPTION HANDLING 16-SEP=1 :0 AX/VMS Macro V04-00 Pa 8 
v0G- EXESNENK_PRICT = MACHINE CHECK RECOVERY 5-SEP=1 138 88 08 ri SYS.SR cit EXCEPTION.MAR: 1 ” (38) 
1 3+ 
iF ; MCHK_TEST = TEST TO SEE IF RECOVERY BLCOK ENABLED AT TIME OF MACHINE CHECK 
5 ; INPUTS: 
5 R1 = POINTER TO PC,PSL OF MACHINE CHECK EXCEPTION 
: ? ouTPuTS: 
1 é ; RO = .TRUE. IF RECOVERY BLOCK CURRENTLY IN EFFECT 
1362 : “FALSE. IF NO RECOVERY BLOCK 
3 ; ALL OTHER REGISTERS PRESERVED 
1g 
; i MCHK_TEST: 
50 04 0252 1 03 CLRL = RO ; ASSUME NO RECOVERY BLOCK 
0000" ¢F D3 0 3 20 sit W°MICHKSGL_SP > IF SP NOT ZERO, THEN RECOVERY BLCOK 
98 D6 0 3A ie pet INCL RO ; SET LOW BIT, INDICATING RECOVERY BLOCK 
05 025¢ 137% RSB ; RETURN 


7. 
TPRTe Me MACHINE CHECK RECOVERY "S755 71382 88: oF: £8 SySv SacI XCE EPT 1 TON MAR: 1 a 3) 


EXESMCHKS_TEST = TEST RECOVERY BLOCK FOR MASK MATCH 
FUNCTIONAL DESCRIPTION: 


TEST TO SEE IF MACHINE CHECK RECOVERY BLOCK EXEISTS bg N MACHINE 
gneck me hee OCCURRED. IF SO, CHECK TO SEE IF PUNC TION MASK 


EXCEPT 
V04- 


me 
Pa 
mn 
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BITS 
INPUTS: 
Ri - POINTS TO PC,PSL PAIR ON STACK FROM MACHINE CHECK 
R2 - CONTAINS BITS TO TEST AGAINST MASK SPECIFIED BY PROTECTED CODE 
OUTPUTS: 


RO - . TRUE. IF RECOVERY BLOCK IN EFFECT AND MASKS MATCH 
-FALSE. IF NEITHER RECOVERY BLOCK OR MASK MATCH 

R2 = DESTROYED 

ALL OTHER REGISTERS PRESERVED 


EXESMCHK_TEST: : 


F3 10 BSBB  MCHK_TEST ; RECOVERY BLOCK IN EFFECT HERE? 
0c 50 € BLBC ~—_—- RO, 508 : NO, RETURN WITH RO CLEAR 
ASSUME MCHKSM_LOG EQ 1 
OA 52 BLBS R2,60$ ; HANDLE LOG BIT SEPARATELY 
oo0o'cr = 5 45$:  BITL R2.W*MCHKSGL_MASK + MASKS MATCH? 
98 BNEG 508 : YES 
5 47$:  CLRL RO + NO, RO = .FALSE. 
50$: RSB + RETURN 
6 


ERROR LOG NOT DISABLED 
WANT TO pisnet E Ne ot CHECK REST 
OF MASK FOR ERROR TYPE 


F8 aes 0$: BLBC 9 CUED, PAGE ATS 
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=-SEP- :06: v04-00 Page 4 
abel be Hs peace tees 5 "Brgeea Tea BSicP ics Fee Me eC HEECE RY Gn tans: «= PA8® (39, 
Symbol table 
10€ RG 
ATYcoNe! ith ag EXESRENECK 5 fe 
ATTCONSTO_ IDX = 19 RG 
ATTCONSTO-MSG Rg 02 BXESACHK BUGCHK 18 RG 
BADAST_10% = XESMCHK-PRTCT C3 Re 
BADAST-MSG & 02 EXESACHE TEST 3 RG 
BADHANDLER_10X = EXESOPCCOs 118 RG 
thy? alia R PTE SPAGRDERR ig RG 
BAD AST 4 EXESPROBEW pecesees ag” ¢ 
EXESRADRMOD 
BUGE FATALExCPT feceeeee “ x EXESREFLECT OA RG 
BUG$~ INVEXCEPTN eeeeeene =X EXE SROPRAND if RS 
BUGS ~KRNLSTAKNV eeeeeeee =X EXESSIGTORET : BeRkan? RS 
BUGS" UNABLCREVA eeereree =X EXESSRCHANDLE +4 . 
EWEEK ¢ 3800358 f EXESTBIT O00016C Re 0 
CHESCTACHAR 6 . ’ ETE SUMWIND aeeeeeee xX 
CHF SL_MCHARGLST = 000000 EXESUN a000187 & O¢ 
CUES RCHICP RANE . 20009 FINALMSG 1900040 R03 
CHF SL_MCH_SAVR = 80 000C FINAL | 10K . aaa 
tee -Sie nate = 09000006 IPL$_ASTDEL = 00000002 
CON TC FROST e TOE i $0086 ¢ S$“ ATTCONSTO eerenenee = X 0 
CONT_FROM-STOP 00025C 02 LIB ore oe 
eee geeeeins & eRe ST 
ETEEAL CM MCNTX eeeeeeee =X 0 RCHKSR COG = Ha ee P 03 
CTLSALL F INALEXC eeeeeeee = X 0 MCH Ka S Gopdves2 RB 
CTLS TACK tereeeee§ X 0 MMGS PTE INO aeeeee os 02 
eT SAG “Exevec poe Fe NORRA Ooo09ter 0 
CTLSGB_SSFILTER eereeeee X 0 PCBSL PHD sali ° 900008 C 
CTL MHANDLR tereneeer = X 0 PHOSL FRE = Bonne 73 
CTL$GL-CMSUPR teexeeee = X 0 PRS$_IPL fe 03 
CTL$GL~ CMUSER terereeer§ X 03 PROTECT_RETURN A 38 oF 
CTL$GL-PCB teeeeeee = X 0 PSLSC_EREC = 2090008 
CTL$GL~ PHD tereneee§ X 0 PSL$C_SUPER = 000000 
EX3ARG” 0000 i 8 0 pet ee -UaeR . 09000 
EXSARG 000 93 83 PSLEMTFP : #00000 
EXCCMD OOOOBF R 3 PSL SA_PRVHOD = BoK8 } 
EXESACVIOLAT Bobo 0 RG sige AL = 2 ° 
tah Seeeee 3 PS $e “CURMOD = 809 00 
EXESASTDEL teeeneee at 33! fe ° 
EXESASTFLT 90000077 RG 6 PS L$ - . eT: 
EXESBREAK 8C RG PSL$V~ . ata 
EXESBUG_CHECK eeerenee Pst $V_CURMOD . 18 
EXESCMOBSUPR 0 94 RG SLSV- ie . 10 
EXESCMODUSER AC RG PSLSV-PRV oe 03 
EXESCOMPAT C RG REFLECT ‘i “ 
EXESCONTSIGNAL A RG svar . 6 
EXESEXCEPTI 8F RG Avie. ° 
EXESEXCMSG eereeeer xX SAV . : 
EOE SE APANOSTE 0000041A RG AVPC . 
EXESGL_ABSTIM teneeere =X SAVPSW . % 
EXESGL-BADACV_ ¢ tereneee x AVRG 12 p 02 
EXESGL-BADACV eeeeeere =X SEARCH 4 3 
EXESGL— ~PAREXCOEC eeeeeeee x SS$_ACCVIO 


SYSSEXIT 
SYSSSETSFM 


VASV_P1 
FATL 


PSECT name 


$AB 
YEXEPAGED1 
SAE XENONPAGED 


Phase 


Initialization 


Command processing | 


Pass 

Symbol table sort 
Pass 

Symbol table output 


Page faults 
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Vn & WW “Ornw——DWo~n 


SSsssaF 
SNF OO LON LDN LOL $$ DOO LOLLOLS 
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Reeeenee 
RRAeReee 
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Reeeeeee 
eeeeeeee 
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Reeeeeee 


= 0000001 


00000105 R 02 


0000 008 
000 3 
00004 
0000027 


9 
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x 0 
x QO 
Gx 0 
Gx 0 
GX 
GX 
GX 
pow oe wee eoeoa ce ee + 
! Psect synopsis ! 
wer en seme eee woes A 
PSECT No. Attributes 
( 0.) 00 ¢ O.) NOPIC  USR 
( on Mw NOPIC  USR 
( "¢ % § ( § ) NOPIC  USR 
( 632.) ( -) NOPIC USR 


eenrae cee $ 


! Performance indicators : 


pec reeeee oer eew esse 


CPU Time 


i 
33 


| gas 
2 00:00:08: 
: :90:10:3 


ABS 
REL 
REL 


AX/VMS Macro 


SYS.SRCJEXC 


EXE 
OSHR EXE 
EXE 


v04-00 Page 
EPTION.MAR; 1 


OSHR NOEXE NORD NOWRT NOVEC BYTE 
NOSHR RD 


RD WRT NOVEC LONG 
RD WRT NOVEC LONG 


(27) 


B 10 
VAX=11 Macro Run Statistics 


Psect synopsis output 1 : ‘8 . : 8 3 

Cross-reference output 8 :00:00. :00:00. 

Assembler run totals 75 7:00:16. :00:48.74 

Ine.¥ orking cf Limit was 1800 pages. 

66462 bytes (130 pages) of virtual memory were used to buffer the intermediate code. 

ieece were 60 pages of symbol table space allocated to hold 953 non-local and 66 local symbols. 


1418 source Lines were read in Pass 1, produc ing object records in Pass 2. 
pages of virtual memory were used to define 27 macros. 


$eere ee cere ee woes eat e es ecewe + 


; Macro Library statistics ; 


Macro Library name Macros defined 


- SSSDUA e: SYS.OBJJLIB.MLB; 1 2 
$255$DUA28: LSYSLIBIST ARL .MLB;2 1 
TOTALS (all Libraries) 24 


1026 GETS were required to define 24 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=LIS$:EXCEPTION/OBJ=OBJ$: EXCEPTION MSRC$:EXCEPTION/UPDATE=(ENHS: EXCEPTION) +EXECMLS$/LIB 


EXCEPTION = EXCEPTION HANDLING ym ae 9 60:06:28 AX/VMS Macro 
“SEP-1984 03:41:4 SYS.SRCJEXCE 
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